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SAP BW ( Business information Warehouse, BW) 业务 信息 仓库 是 SAP 公司 推出 的 数据 仓 
库 产品 ， 是 实施 企业 商务 智能 系统 的 重要 组 成 部 分 ， 也 是 商务 智能 前 端 展现 的 数据 基础 。 由 
于 BW 能 够 和 SAP 的 相关 解决 方案 ， 如 SAP ERP (Enterprise Resources Planning，ERP) 系 
统 、SAP CRM (Customer Relationship Management, CRM) 系统 等 ， 进 行 天 然 无 颖 的 数据 集 
成 ， 同 时 也 能 很 好 地 集成 其 他 应 用 系统 ， 因 此 越 来 越 多 的 企业 选择 实施 和 应 用 BW, DUAE 
企业 的 数据 仓库 解决 方案 。 

ТЕ BW 数据 仓库 中 , BW 本 身 提 供 了 标准 的 “最 佳 业 务实 践 ”， 也 就 是 通常 所 说 的 业务 
目录 (Business Content，BCT) 。 在 标准 的 业务 目录 中 ，SAP 提供 了 除 用 户 名 以 外 的 几乎 涵 
盖 所 有 与 业务 流程 相关 的 数据 仓库 对 象 ， 其 中 包括 数据 源 、 信 息 包 、 转 换 、 数 据 传输 进程 、 
数据 存储 对 象 DSO 、 信 息 块 、 多 信息 提供 者 、 信 息 集 、 查 询 、 权 限 对 象 、 甚 至 是 角色 ， 
此 ， 大 大 降低 了 构建 和 运行 数据 仓库 的 企业 总 体 拥 有 成 本 。 但 是 ， 由 于 标准 的 业务 目录 不 能 
满足 用 户 所 有 的 需求 ， 因 此 在 项 目 实施 过 程 中 必须 基于 BW 标准 功能 进行 增强 和 开发 ， 以 满 
足 用 户 独 特 的 需求 。 

由 于 BW AES HERE T SAP АВАР 应 用 服务 器 和 SAP JAVA 应 用 服务 天 进行 设计 和 开 
发 的 ， 因 此 ， 项 目 中 大 部 分 的 增强 或 个 性 化 开发 都 需要 使 用 SAP АВАР (Advanced Business 
Application Programming, АВАР) 语言 。 但 是 ,在 项 目的 实施 和 后 续 维 护 过 程 中 ， 很 多 顾问 
或 BW 的 从 业者 已 经 在 个 人 脑海 中 建立 起 了 国定 的 、 对 于 BW 涉及 的 ABAP 语言 程序 的 喜 
好 ， 而 对 自己 不 熟悉 的 内 容 会 说 “这 个 需求 BW 系统 满足 不 了 ”。 这 种 喜好 是 因为 这 些 人 没 
有 从 BW 的 实施 过 程 中 获得 足够 多 的 АВАР 语言 知识 ， 因 此 ， 作 者 建议 所 有 的 BW 顾问 或 从 
业者 都 能 参与 SAP 标准 的 ABAP 培训 课程 ， 以 获得 日 常 工作 所 需 的 所 有 АВАР 语言 知识 ， 
为 具有 丰富 经 验 的 BW 顾问 能 够 从 大 量 的 系统 BADI 对 象 增 强 接口 和 User Exit 用 户 出 口中 对 
特定 用 户 的 特定 需求 进行 完美 的 实施 (而 不 是 通过 大 量 的 其 他 工作 ， 其 至 是 系统 外 的 工具 
来 实现 既定 的 目标 ) ， 从 而 大 大 减少 项 目的 工作 量 、 降 低 实施 难度 ， 以 完美 地 满足 用 户 需 
求 ， 这 在 项 目 实施 中 尤为 重要 。 

本 书 的 目的 就 是 尽量 将 BW 系统 中 的 功能 增强 点 列 示 出 来 ， 并 且说 明 这 些 接口 的 应 用 场 
景 、 数 据 接口 规格 、 具 体 使 用 方法 及 案例 ， 使 本 书 的 读者 在 阅读 完 本 书 之 后 能 够 对 后 续 的 
BW 相关 工作 有 所 帮助 ， 也 为 BW 顾问 的 项 目 实施 提供 一 份 技术 参考 。 

本 书 结构 和 通常 实施 BW 数据 仓库 的 过 程 是 紧密 相关 的 ， 也 和 BW 数据 仓库 的 数据 流 流 
向 紧密 相关 ， 也 就 是 从 数据 抽取 、 数 据 转换 、 数 据 加 载 、 数 据 管理 、 数 据 展现 等 环节 逐一 展 
开 进 行 讲解 。 

第 1 章 主要 讲解 计算 机 技术 的 发 展 、 数 据 处 理 的 历史 过 程 和 数据 仓库 的 由 来 。 

第 2 章 主要 对 SAP 公司 以 及 SAP 公司 的 相关 产品 进行 简要 介绍 ， 同 时 ， 重 点 对 BW fH 
关 的 基本 概念 做 详细 介绍 ， 如 商务 智能 、 数 据 仓库 、 星 形 模型 、 特 性 、 关 键 指标 、 数 据 提 供 
者 、 信 息 块 和 数据 存储 对 象 (DSO) 等 。 
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第 3 章 在 对 SAP АВАР 语言 和 SAP 增强 的 概念 进行 简要 介绍 的 同时 ， 还 对 BW 系统 的 增 
强 以 及 在 BW 系统 中 使 用 АВАР 语言 的 注意 事项 和 性 能 提升 建议 进行 了 描述 。 

第 4 章 主 要 讲解 在 ERP 源 系统 中 设置 和 增强 数据 源 的 各 种 方法 。 

第 5 章 主要 讲解 在 BW 数据 仓库 中 数据 上 载 过 程 的 各 种 增强 ， 包 括 信息 包 的 增强 、 转 换 
的 增强 、 数 据 传输 进程 的 增强 等 。 为 了 覆盖 之 前 的 版 本 ， 作 者 在 最 后 也 对 BW 3. x 的 相关 增 
强 进行 了 说 明 。 

第 6 章 主要 讲解 数据 仓库 管理 中 的 对 象 ， 包 括 对 信息 块 的 访问 ， 以 及 在 虚拟 信息 块 和 虚 
拟 关键 指标 等 数据 管理 过 程 中 的 增强 。 

第 7 章 主要 讲解 BW 数据 展现 过 程 中 的 增强 。 

第 8 章 主要 讲解 使 用 BW - BPS fil BW -了 进行 企业 全 面 预算 管理 过 程 中 会 涉及 的 
ABAP 例 程 增强 的 开发 。 

第 9 章 主要 讲解 BW 系统 建成 上 线 后 ， 在 后 期 维护 过 程 中 通常 会 使 用 的 一 些 АВАР 应 用 
场景 ， 包 括 处 理 链 的 调度 和 监控 ， 以 及 数据 的 管理 。 

第 10 章 主要 将 与 BW 数据 仓库 系统 相关 的 、 重 要 的 BADI, UserExit, Ж, ЖР, f 
序 类 以 及 相关 重要 的 表格 等 进行 了 罗列 ， 这 也 是 作者 多 年 实施 BW 数据 仓库 的 经 验 总 结 。 

最 后 ， 附 录 列 举 了 本 书 中 涉及 的 相关 技术 术语 的 对 照 查 询 索 引 。 

本 书 的 АВАР 语言 逻辑 和 示例 都 是 基于 BW 7.01 进行 设计 和 说 明 的 ， 但 是 这 些 增强 点 
和 实施 方法 同样 适用 于 BW 3.x 以 及 当前 的 最 新 版 本 BW 7.4， 只 是 部 分 代码 段 需要 做 一 些 
调整 。 

为 了 使 本 书简 单 易 懂 ， 本 书 的 相关 代码 段 都 尽量 不 使 用 面向 对 象 语言 АВАР ОО 的 方式 
进行 描述 ， 因 为 根据 作者 的 经 验 ， 很 多 顾问 或 用 户 对 АВАР ОО 的 知识 了 解 甚 少 ， 同 时 也 因 
为 在 BW 中 ,使 用 АВАР ОО 的 优点 不 是 特别 明显 ， 所 以 作者 更 倾向 于 使 用 功能 模块 ， 也 就 
是 Function Module 的 方式 进行 代码 的 编写 。 当 然 ， 这 对 于 那些 已 经 熟悉 掌握 了 АВАР ОО Ж 
序 编写 方式 的 人 来 说 ， 看 懂 本 书 和 按照 本 书 举例 的 代码 去 实施 项 目 同样 不 是 一 件 太 难 的 事 
fi. 但 是 ， 在 本 书 的 第 8 章 中 , 由 于 BW -IP 预算 和 计划 中 АВАР ОО 新 技术 所 带 来 的 冲击 ， 
不 可 避免 地 涉及 了 一 些 ABAP 00 的 代码 ， 所 以 相关 代码 也 为 初学 者 做 了 一 步 一 步 地 详细 讲 
解 。 正 是 因为 最 近 几 年 ABAP ОО 技术 的 突飞猛进 ， 所 以 作者 建议 所 有 的 ЗАР 从 业者 都 应 该 
掌握 或 至 少 了 解 АВАР ОО ER, 

日 前， 商务 智能 和 数据 仓库 都 还 在 不 断 地 飞速 发 展 中 ， 新 的 概念 和 理念 在 不 断 地 涌现 ， 
作者 希望 通过 本 书 ， 能 够 给 从 业者 一 些 建 议和 指引 。 限 于 作者 的 水 平 ， 书 中 难免 存在 玻 漏 ， 
甚至 是 错误 ， 欢 迎 广大 读者 批评 指正 。 作 者 私人 邮箱 为 aihuaxie939@ 163. com， 有 任何 意见 
或 建议 请 通过 邮件 的 方式 联系 作者 。 
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Жа — 数据 仓库 和 商务 智能 


1.1 计算 机 技术 的 发 展 


1946 年 ， 美 国宾 儿 法 尼 亚 大 学 的 埃 克 特 和 莫 希 里 研制 出 世界 上 第 一 台电 子 多 用 途 计算 
机 “ 挨 尼 阿 克 (ENIAC)”， 从 而 开启 了 人 类 社会 信息 技术 革命 的 序幕 。 从 第 一 台 多 用 途 计 
算 机 诞生 开始 ， 截 至 目前 ， 信 息 技术 经 历 了 大 型 主机 、 小 型 计算 机 、 微 型 计算 机 、 客 户 / 服 
务 器 、 互 联网 、 云 计算 六 大 阶段 。 

第 一 阶段 即 大 型 主机 阶段 。 此 阶段 主要 是 20 世纪 40 ~50 年 代 ， 这 也 是 第 一 台 多 用 途 计 
算 机 诞生 的 年 代 ， 此 时 的 计算 机 大 都 体型 庞大 ， 如 第 一 台 计 算 机 就 重 约 27t， 占 地 150 m°, 
H 18 800 个 电子 管 构成 。 在 经 历 了 电子 管 数 字 计 算 机 、 唱 体 管 数字 计算 机 、 集 成 电路 数字 
计算 机 和 大 规模 集成 电路 数字 计算 机 等 发 展 历程 后 ， 计 算 机 技术 逐渐 走向 成 熟 。 虽 然 改 良 之 
后 的 大 型 主机 在 中 小 企业 已 经 难 疯 踪迹 ,但 是 在 银行 、 保 险 、 民 航 等 公用 领域 还 继续 发 挥 着 
其 作用 。 

第 二 阶段 即 小 型 计算 机 阶段 。 此 阶段 主要 是 20 世纪 60 ~70 年 代 ， 由 于 半导体 和 集成 电 
路 技术 的 不 断 升 级 发 展 ， 人 类 已 经 能 将 身 形 巨 大 的 大 型 机 “缩小 ”到 一 个 可 以 接受 的 范围 ， 
并 且 在 使 用 成 本 上 也 降低 到 中 小 企业 能 够 接受 的 范围 之 内 。 现 在 很 多 企业 使 用 的 服务 器 都 属 
于 小 型 计算 机 的 范畴 ， 其 体型 要 小 于 大 型 主机 ， 大 于 常见 的 个 人 计算 机 。 

第 三 阶段 即 微型 计算 机 阶段 。 此 阶段 主要 是 20 世纪 70 ~ 80 年 代 ， 是 对 大 型 主机 的 第 二 
次 “缩小 " ， 此 时 的 计算 机 已 经 小 到 能 放置 在 用 户 的 桌面 ， 因 此 又 被 称 为 “微机 ”或 个 人 计 
算 机 。 美 国 革 果 公司 于 1977 FERA Apple 基础 上 推出 了 第 二 代 计 算 机 Apple IL, ХАЖ 
功 。 而 在 1981 年 ， 国 际 商业 机 器 (IBM) 公司 推出 了 IBM - PC， 通 过 若干 年 的 演进 ， 其 功 
能 得 到 不 断 增强 ， 并 迅速 占领 了 计算 机 市 场 ， 使 得 个 人 计算 机 得 到 了 很 大 程度 的 普及 。 

第 四 阶段 即 客户 /服务 器 阶段 。 这 一 阶段 出 现 的 标志 是 1964 年 IBM 与 美国 航空 公司 建 
立 的 第 一 个 全 球 联机 订 票 系统 ， 将 全 美 2 000 多 个 订 票 终端 连 在 了 一 起 。 客 户 / 服 务 器 的 结 
构 到 今天 仍然 被 相当 多 的 应 用 系统 所 采用 ， 即 使 后 来 风靡 全 球 的 三 系统 架构 ， 也 只 算是 客 
户 / 服 务 器 结构 的 优化 ， 而 且 随 着 时 间 的 推移 和 互联 网 的 出 现 ， 部 分 客户 端 进 一 步 被 移植 到 
浏览 器 上 。 在 这 一 结构 中 ， 服 务 器 是 网 络 的 核心 ， 客 户 端 是 网 络 的 基础 ， 客 户 端 依靠 服务 器 
来 获得 所 需 的 网 络 资源 ， 其 优点 在 于 能 够 充分 发 挥 客户 端的 计算 能 

第 五 阶段 即 互联 网 阶段 。 互 联网 即 广域网 、 局 域 网 及 单机 按照 一 定 的 通信 协议 组 成 的 国 
际 计算 机 网 络 。 互 联网 起 源 于 1969 年 ， 当 年 美国 国防 部 研究 计划 署 制 定 了 协定 ， 将 加 利 福 
尼 亚 大 学 洛杉矶 分 校 、 斯 坦 福 大 学 研究 学 院 、 加 利 福 尼 亚 大 学 和 犹他 州 大 学 的 4 台 主 要 计算 
机 联接 起 来 。 此 后 ， 互 联网 经 历 了 从 文本 到 图 片 、 再 到 现在 的 语音 和 视频 阶段 ， 网 络 带宽 也 
越 来 越 大 ， 互 联网 功能 也 越 来 越 强 ， 以 至 于 1990 年 之 后 出 生 的 人 会 被 贴 上 “互联 网 时 代 原 
住民 ”或 “互联 网 一 代 ” 的 标签 。 


Ж 


第 六 阶段 即 云 计 算 阶 段 。 从 2008 年 开始 ,“ 云 计算 ”“ 大 数据 ” “内存 计 算 ” 和 “移动 
应 用 ” 变 成 了 炙手可热 的 计算 机 概念 ， 而 这 样 的 专业 术语 正在 成 为 一 个 通俗 且 大 众 化 的 词 
语 。 其 中 ,“ 云 计算 ”被 视 为 “革命 性 的 计算 模型 "， 因 为 在 互联 网 的 支撑 下 ， 它 使 超级 计 
算 能 力 通过 互联 网 自由 流通 成 为 了 可 能 。 企 业 与 个 人 用 户 无 须 投 入 昂贵 的 硬件 购置 成 本 ， 只 
需 通过 互联 网 来 购买 计算 能 力 即 可 ， 用 户 只 需 为 自己 使 用 的 计算 能 力 付 钱 。 同 时 ， 还 省 去 了 
传统 软件 在 硬件 、 软 件 和 专业 技能 等 方面 的 花费 。 云 计算 宫 括 了 开发 、 架 构 、 负 载 平 衡 和 商 
业 模 式 等 ， 是 软件 业 的 未 来 模式 。 


12 数据 存储 技术 的 发 展 


计算 机 硬件 经 历 了 从 大 型 机 到 微型 机 的 进化 过 程 ， 但 是 对 于 数据 处 理 不 断 增长 的 需求 却 
贯穿 了 整个 计算 机 的 发 展 历程 。 数 据 处 理 主要 就 是 对 数据 的 管理 ， 包 括 对 数据 的 分 类 、 组 
织 、 编 码 、 存 储 、 检 索 和 维护 等 ， 这 些 也 是 数据 处 理 的 中 心 问题 。 

近 半 个 世纪 以 来 ， 数 据 管理 经 历 了 3 个 发 展 阶段 ， 分 别 是 人 工 管 理 阶段 、 文 件 系统 阶段 
和 数据 库 系统 阶段 。 

20 世纪 50 年 代 以 前 ， 计 算 机 (主要 是 大 型 机 ) 主要 用 于 科学 计算 ， 其 本 身 并 不 带 有 存 
储 设备 ， 也 没有 操作 系统 的 概念 ， 数 据 处 理 只 有 批 处 理 方式 。 所 有 数据 都 不 在 计算 机 上 保 
存 ， 而 是 由 应 用 程序 员 管 理 。 应 用 程序 员 不 仅 要 规定 数据 的 逻辑 结构 ， 而 且 要 在 应 用 程序 中 
设计 物理 结构 ， 包 括 规定 数据 的 存储 结构 和 读 取 方式 等 。 

20 世纪 50 年 代 至 60 年 代 中 期 数据 管理 处 于 文件 系统 阶段 。 计 算 机 上 出 现 了 磁盘 、 
磁 鼓 等 随机 存 取 设 备 ， 文 件 系统 成 为 了 专门 的 数据 管理 软件 。 这 样 ， 数 据 可 以 长 期 保存 ， 并 
且 使 用 文件 系统 来 进行 管理 ， 使 得 程序 和 数据 之 间 有 了 一 定 的 独立 性 ， 尽 管 这 种 独立 性 还 不 
是 很 强 。 此 时 的 应 用 程序 设计 者 必须 对 所 有 文件 的 逻辑 结构 和 物理 结构 有 清楚 的 了 解 ， 同 时 
由 于 文件 系统 只 提供 了 最 为 基础 的 读 、 写 等 文件 操作 命令 ， 因 此 对 文件 的 查询 、 修 改 、 插 人 
和 删除 等 操作 必须 在 应 用 程序 内 编写 相应 的 程序 代码 来 解决 ， 这 使 得 文件 系统 只 能 专门 为 某 
一 特定 的 应 用 程序 服务 ， 故 应 用 程序 的 应 用 效率 不 高 ， 数 据 见 余 度 大 。 

20 HE2 60 年 代 后 期 以 后 ， 计 算 机 进入 了 小 型 机 时 代 ， 同 时 数据 管理 进入 了 数据 库 系 统 
阶段 。 这 一 时 期 ， 计 算 机 具有 了 庞大 容量 的 存储 设备 和 高 速 的 信息 处 理 能 力 。 计 算 机 软件 和 
硬件 都 飞速 发 展 ， 信 息 急剧 膨胀 ， 数 据 库 技术 也 日 新 月 异 ， 鞍 勃发 展 。 数 据 库 按照 某 种 数据 
模型 组 织 数据 ， 不 仅 文件 内 部 数据 彼此 关联 ， 而 且 文 件 之 间 在 结构 上 也 有 机 地 联系 在 一 起 ， 
当 描 述 数 据 时 ， 不 仅 描 述 数 据 本 身 ， 也 描述 数据 之 间 的 联系 。 在 数据 库 中 ， 数 据 不 再 分 属于 
各 个 应 用 程序 ， 而 是 集中 存放 在 一 起 ， 实 行 统一 管理 。 这 一 时 期 ， 也 出 现 了 专门 的 数据 库 
系统 。 

1969 ^E, IBM 公司 开发 了 第 一 个 数据 库 系统 IMS (Information Management System), X 
是 一 个 层次 数据 库 系统 ， 在 数据 库 系统 发 展 史上 意义 重大 。 同 年 ， 美 国 的 数据 系统 语言 委员 
会 下 属 的 数据 库 任 务 组 提出 了 著名 的 DBTG 报告 ， 并 在 1970 年 提出 了 该 报告 的 修订 版 。 这 
份 报告 定义 了 数据 库 操作 语言 、 模 式 定 义 语言 和 子 模式 定义 语言 的 概念 。 数 据 库 操作 语言 用 
于 编写 操作 概念 视图 的 应 用 程序 ， 模 式 定义 语言 用 来 编写 概念 视图 和 内 部 视图 相 结 合 的 模式 
程序 。 在 20 世纪 70 年 代 ， 有 许多 遵循 DBTG 报告 的 网 状 数据 库 系统 出 现 ， 如 IDMS IDS, 
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DMSIIOO 等 。20 世纪 70 FARW, IBM 公司 下 属 的 研究 所 发 表 了 题 为 《大 型 共享 数据 库 数据 
的 关系 模型 》 一 文 。 在 此 论文 中 提 到 了 关系 数据 模型 的 概念 ， 而 关系 代数 和 关系 演算 的 提 
出 ， 使 关系 型 数据 库 从 理论 到 实践 都 取得 了 辉煌 的 成 就 ， 许 多 著名 的 关系 型 数据 库 也 应 运 而 
Æ, ùN System R. Ingres, Oracle 等 。1986 4E, 美国 国家 标准 协会 (ANSI) 通过 了 关系 数据 
库 查询 语言 SQL 的 文本 标准 。 

20 世纪 80 年 代 以 后 ， 随 着 计算 机 硬件 技术 的 发 展 ， 计 算 机 应 用 得 以 不 断 深 入 ， 从 而 产 
生 了 许多 新 的 应 用 领域 ， 如 计算 机 辅助 设计 、 计 算 机 辅助 制造 、 计 算 机 集成 制造 、 办 公 自 动 
化 和 地 理 信息 处 理 等 。 但 是 由 于 没 能 设计 出 统一 的 数据 模型 来 表示 这 些 新 型 数据 及 其 相互 关 
系 ， 因 此 出 现 了 百家争鸣 的 局 面 ， 产 生 了 面向 对 象 数 据 库 、 工 程 数 据 库 、 时 态 数据 库 、 地 理 
数据 库 、 模 糊 数据 库 和 积极 数据 库 等 ， 但 是 真正 统一 的 新 一 代数 据 库 系统 未 能 出 现 。 

进入 到 21 世纪 ， 计 算 机 软 、 硬 件 技术 飞速 发 展 ， 不 仅 在 数据 处 理 速度 上 突飞猛进 ， 在 
数据 的 存储 上 也 是 日 新 月 异 ， 同 时 不 断 增 加 的 企业 数据 容量 和 对 数据 实时 获取 的 需求 ， 人 迫切 
需要 新 一 代 的 数据 库 系统 的 出 现 ， 德 国 的 SAP 公司 顺势 推出 了 自己 的 内 存 数据 库 产品 。 内 
存 数据 库 ， 顾 名 思 义 就 是 将 数据 放 在 内 存 中 直接 进行 读 、 写 操作 的 数据 库 。 相 对 于 传统 的 磁 
盘 ， 内 存 的 读 写 速度 要 高 出 好 几 个 数量 级 ， 将 数据 保存 在 内 存 中 相 比 对 磁盘 进行 读 写 能 极 大 
地 提高 应 用 的 性 能 ， 从 而 解决 实际 的 应 用 需求 。 目 前 ， 内 存 数据 库 技术 还 在 不 断 地 发 展 、 进 
化 过 程 中 。 


13 从 数据 库 到 数据 仓库 


目前 的 商业 、 企 业 管 理 的 数据 处 理 大 致 可 以 分 成 两 类 ， 即 在 线 交 易 处 理 (Оп - Line 
Transactional Process, OLTP) 和 在 线 分 析 处 理 (On - Line Analysis Process，OLAP) 。 交 易 处 
理 也 称 为 事务 性 处 理 ， 一 般 针 对 非常 具体 的 业务 ， 是 对 数据 库 联机 的 日 常 操作 ， 通 常 是 对 一 
个 或 一 组 记录 的 查询 和 修改 ， 主 要 为 特定 的 应 用 场景 服务 。 人 们 关心 的 是 响应 时 间 、 数 据 的 
完整 性 和 安全 性 ， 在 线 分 析 处 理 一 般 是 针对 某 个 主题 ， 在 时 间 上 有 比较 大 的 跨度 ， 它 操作 的 
是 大 量 ， 甚 至 是 海量 的 数据 ， 这 些 数 据 是 操作 性 数据 的 一 种 积累 和 六 选 ， 它 主要 面向 业务 分 
析 和 决策 支持 。 

数据 库 系统 在 相当 长 的 时 间 内 作为 数据 管理 的 主要 手段 ， 从 其 诞生 的 第 一 天 起 ， 就 被 主 
要 用 于 事务 处 理 ， 经 过 数 十 年 的 发 展 ， 在 这 些 数据 库 中 已 经 保存 了 大 量 的 日 常 业 务 数据 。 随 
着 技术 的 进步 ， 人 们 也 试图 让 计算 机 执行 更 多 的 任务 ， 而 数据 库 技术 也 一 直 力 图 能 使 自己 胜 
任 从 事务 处 理 、 批 处 理 到 分 析 处 理 等 不 同类 型 的 信息 处 理 任 务 。 后 来 人 们 逐渐 意识 到 ， 在 目 
前 计算 机 处 理 的 能 力 上 ， 根 本 无 法 完全 实现 这 些 功能 ， 而 在 另 一 方面 ， 在 线 事务 处 理 和 在 线 
分 析 处 理 具有 极 不 相同 的 性 质 ， 直 接 用 事务 处 理 环境 来 支持 分 析 和 决策 在 很 多 方面 具有 先天 
的 缺陷 。 

在 线 交 易 处 理 不 适宜 决策 应 用 的 原因 如 下 : 

首先 ,在 在 线 交 易 处 理 环 境 中 ， 用 户 一 般 是 具体 的 操作 人 员 ， 他 们 的 行为 特点 是 数据 的 
存 取 操 作 ， 并 不 用 去 理会 数据 对 决策 的 用 处 ， 操 作 频 率 高 且 每 次 操作 的 时 间 短 ， 但 对 系统 的 
响应 速度 有 极 高 的 要 求 ; 而 对 在 线 分 析 处 理 而 言 ， 用 户 是 企业 的 管理 人 员 或 数据 分 析 师 ， 属 
于 信息 的 探索 者 ， 他 们 的 目的 是 要 将 产生 的 数据 抽象 为 信息 ， 以 便于 决策 。 其 行为 模式 和 在 
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线 交 易 处 理 完全 不 同 ， 他 们 可 能 会 使 一 个 决策 文 持 系统 (Decision - making Support System, 
DSS) 应 用 程序 联机 工作 几 小 时 ， 从 而 消耗 大 量 的 系统 资源 ， 进 而 影响 到 业务 操作 的 高 效 
运行 。 

其 次 ，DSS 过 程 需要 集成 的 、 历 史 的 、 综 合 的 数据 ， 全 面 而 正确 的 数据 是 有 效 分 析 和 决 
策 的 首要 前 提 。 相 关 数 据 收集 得 越 完 整 、 反 映 的 信息 面 越 广 、 清 洗 得 越 干 净 ， 最 后 得 到 的 结 
果 就 越 可 靠 。 目 前 ， 绝 大 多 数 企业 数据 的 实际 分 布 情况 都 是 以 信息 孤岛 的 形式 存在 ， 在 具体 
的 在 线 交 易 环 境 中 ， 部 分 数据 记录 甚至 被 “束之高阁 ”， 在 降低 交易 系统 性 能 的 同时 ， 也 使 
宝贵 的 信息 资源 被 白白 浪费 。 

近 些 年 来 ， 随 着 数据 库 技术 的 应 用 和 发 展 ， 人 们 尝试 对 数据 库 中 的 数据 进行 再 加 工 ， 构 
建 一 个 综合 的 、 面 向 分 析 的 环境 ， 以 更 好 地 建设 商务 智能 支持 企业 决策 ， 从 而 形成 了 数据 仓 
库 技 术 。 数 据 仓 库 系 统 包括 多 维 数据 仓库 、 联 机 分 析 处 理 OLAP 或 商务 智能 (Business Intel- 
ligence，BI) 、 数据 挖掘 (Data Mining, DM) 等 多 个 方面 。 


1.4 数据 仓库 


14.1 数据 仓库 的 定义 


数据 仓库 (Data Warehouse, DW) 是 决策 支持 系统 ( Decision Support System, DSS) 和 
联机 分 析 应 用 (On - Line Analysis Processor, OLAP) 数据 源 的 结构 化 数据 环境 。 数 据 仓 库 
研究 和 解决 从 数据 库 中 获取 信息 的 问题 。 数 据 仓库 的 特征 在 于 其 面向 主题 、 集 成 性 、 稳 定性 
和 历史 积累 性 。 

数据 仓库 之 父 William H. Inmon 在 1991 年 出 版 的 《Building the Data Warehouse》 一 书 中 
所 提出 的 定义 被 广泛 接受 ， 即 数据 仓库 是 一 个 面向 主题 的 (Subject Oriented ) 、 集 成 的 
(Integrated) 、 相 对 稳定 的 (Non - Volatile) 、 反 映 历 史 变 化 (Time Variant). 的 数据 集合 ， 用 
于 支持 管理 决策 (Decision Making Support) 的 信息 系统 。 


1.4.2 数据 仓库 的 特性 


数据 仓库 不 同 于 传统 的 数据 库 ， 其 特点 主要 体现 在 “目标 任务 ”“ 数 据 覆 盖 面 ” “数据 
粒度 ”“ 数 据 稳定 性 ”“ 存 取 数 据 量 ” 和 “响应 时 间 ” 等 方面 。 

1. 面向 主题 

操作 型 数据 库 的 数据 组 织 面向 事务 处 理 任务 ， 各 个 业务 系统 之 间 各 自分 离 ， 而 数据 仓库 
中 的 数据 是 按照 一 定 的 主题 域 进 行 组 织 的 。 主 题 是 与 传统 数据 库 的 面向 应 用 相对 应 的 ， 是 一 
个 抽象 概念 ， 是 在 较 高 层次 上 将 企业 信息 系统 中 的 数据 综合 、 归 类 并 进行 分 析 和 利用 的 对 
象 。 每 一 个 主题 对 应 一 个 宏观 的 分 析 领 域 ,通常 的 主题 包括 “财务 ”“ 成 本 ”“ 采 购 ”“ 生 
产 ”“ 库 存 ”“ 销 售 ”“ 人 力 资 源 ”“ 质 量 ” 和 “市 场 信息 ”等 。 数 据 仓库 排除 了 对 于 决策 
无 用 的 数据 ， 提 供 了 特定 主题 的 全 部 视图 。 

2. 集成 的 

数据 仓库 中 的 数据 是 在 对 原 有 分 散 的 数据 库 数据 进行 抽取 和 清洗 的 基础 上 ， 经 过 系统 加 
工 、 汇 总 和 整理 得 到 的 ， 必 须 消除 原始 数据 中 的 不 一 致 性 ， 以 保证 数据 仓库 内 的 信息 是 关于 
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整个 企业 的 、 一 致 的 、 全 局 的 信息 ， 而 不 是 一 个 一 个 的 信息 孤岛 。 

3. 高 度 汇 总 的 

一 般 来 说 ， 存 储 于 数据 仓库 系统 中 用 于 做 出 管理 决策 的 数据 ， 大 都 是 经 过 提 炬 之 后 的 数 
据 ， 而 不 是 像 在 线 交 易 系 统 那 样 ， 存 储 了 作为 明细 级 别 的 数据 ， 以 供 业务 操作 使 用 ， 因 此 其 
数据 的 粒度 相对 数据 库 系统 而 言 比较 粗 ， 也 就 是 属于 高 度 汇 总 的 数据 。 

4. 相对 稳定 的 

数据 仓库 中 的 数据 主要 供 企 业 决 策 分 析 之 用 ， 所 涉及 的 数据 操作 主要 是 数据 查询 ， 一 且 
某 个 数据 进入 数据 仓库 以 后 ， 一 般 情况 下 将 被 长 期 保留 ， 也 就 是 数据 仓库 中 一 般 有 大 量 的 查 
询 操作 ， 但 修改 和 删除 操作 很 少 ， 通 常 只 需要 定期 的 加 载 和 刷新 。 

5S. 反映 历史 变化 

数据 仓库 中 的 数据 通常 包含 历史 信息 ， 系 统 记 录 了 企业 从 过 去 某 一 时 间 点 (如 开始 应 
用 数据 仓库 的 时 间 点 ) 到 目前 的 各 个 阶段 的 信息 ， 通 过 这 些 信息 ， 可 以 对 企业 的 发 展 历程 
和 未 来 趋势 做 出 定量 分 析 和 预测 。 而 在 应 用 这 些 历史 数据 时 ， 系 统 读 取 和 运算 的 数据 往往 是 
巨大 的 ， 有 时 候 甚至 可 达 几 十 亿 条 。 

6. 时效 性 要 求 低 

假设 读者 去 医院 排队 挂号 ， 但 是 却 被 告知 由 于 系统 本 身 性 能 太 差 ， 而 导致 了 挂号 的 延 
误 ， 可 想 而 知 后 果 会 是 怎样 的 ， 因 此 对 于 数据 库 应 用 系统 的 时 效 性 要 求 是 非常 高 的 。 但 是 对 
于 数据 仓库 而 言 ， 由 于 使 用 对 象 是 数据 探索 者 ， 因 此 对 于 时 效 性 的 要 求 不 是 那么 高 ， 只 需要 
在 可 以 接受 的 时 间 段 内 能 够 得 到 想 要 的 结果 即 可 ， 甚 至 有 些 时 候 被 期 望 的 时 间 可 能 长 达 一 天 
或 几 天 。 


1.5 商务 智能 


1.5.1 商务 智能 的 定义 


商务 智能 (Business Intelligence, BI) 的 概念 最 早 于 1996 年 由 高 德 纳 咨询 公司 (Gartner 
Group) 提出 ， 其 将 商务 智能 定义 为 : 商务 智能 描述 了 一 系列 的 概念 和 方法 ， 通 过 应 用 基于 
业务 实际 的 支持 系统 来 辅助 商业 决策 的 制定 。 商 务 智能 技术 提供 使 企业 迅速 分 析 数 据 的 技术 
和 方法 ， 包 括 收 集 、 管 理 和 分 析 数 据 ， 将 这 些 数据 转化 为 有 用 的 信息 ， 然 后 分 发 到 企业 的 各 
个 部 门 。 

可 以 认为 ， 商 务 智能 是 对 商业 信息 的 搜集 、 管 理 和 分 析 ， 目 的 是 使 企业 的 各 级 决策 者 能 
够 获得 足够 的 知识 或 洞察 力 ， 促 使 他 们 做 出 对 企业 更 有 利 的 决策 。 商 务 智能 一 般 由 数据 仓 
库 、 联 机 分 析 处 理 、 数 据 挖掘 、 数 据 备份 和 恢复 等 部 分 组 成 。 商 务 智能 的 实现 涉及 软件 、 硬 
件 、 咨 询 服 务 及 应 用 ， 其 基本 体系 结构 包括 数据 仓库 、 联 机 分 析 处 理 和 数据 挖掘 3 部 分 。 

商务 智能 通常 被 理解 为 将 企业 中 现 有 的 数据 提炼 为 信息 ， 进 而 转化 为 知识 ， 帮 助 企业 做 
出 明智 的 业务 经 营 决 策 的 工具 。 这 里 所 说 的 数据 包括 来 自 企 业 业 务 系统 的 订单 、 库 存 、 交 易 
账目 、 客 户 和 供应 商 等 ,来 自 企 业 所 处 行业 和 兖 争 对 手 的 数据 ， 以 及 来 自 企业 所 处 的 其 他 外 
部 环境 中 的 各 种 数据 ， 如 国际 原油 价格 和 大 宗 商 品 期 货 价 格 等 。 而 商务 智能 能 够 辅助 的 业务 
经 营 决 策 ， 既 可 以 是 操作 层 的 ， 也 可 以 是 战术 层 和 战略 层 的 。 为 了 将 数据 转化 为 知识 ， 需 要 
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利用 数据 仓库 、 联 机 分 析 处 理工 具 和 数据 挖掘 等 技术 。 因 此 ， 从 技术 层面 上 讲 ， 商 务 智能 不 
是 什么 新 技术 ， 它 只 是 “数据 仓库 ” “联机 分 析 处 理 ” 和 “数据 控 掘 ”等 技术 的 综合 运用 。 

所 以 ， 把 商务 智能 看 成 是 一 种 解决 方案 应 该 比较 恰当 。 商 务 智 能 应 用 的 关键 是 从 企业 许 
多 不 同业 务 系统 中 提取 出 有 用 的 数据 并 进行 清洗 ， 以 保证 数据 的 正确 性 ， 然 后 经 过 抽取 
(Extraction) 、 转 换 (Transformation) 和 装载 (Load), В ETL 过 程 ， 合 并 到 一 个 企业 级 的 数 
据 仓库 里 ， 从 而 得 到 企业 数据 的 唯一 全 局 视图 ， 再 在 此 基础 上 利用 合适 的 查询 和 分 析 工 具 ， 
以 及 数据 挖掘 工具 对 其 进行 分 析 和 处 理 (这 时 信息 变 为 辅助 决策 的 知识 ) ， 最 后 将 知识 呈现 
给 管理 者 ， 为 其 决策 提供 支持 。 


1.5.2 商务 智能 的 特点 


1. 成 熟 的 数据 仓库 管理 能 

目前 ， 商 务 智能 市 场 上 有 多 种 数据 仓库 管理 软件 ， 它 们 都 可 以 提供 全 面 的 数据 仓库 建设 
和 管理 工具 。 这 些 工具 涵盖 了 从 源 系统 链接 、 数 据 来 源 获 取 、 数 据 清洗 和 转换 、 数 据 装载 调 
度 、 明 细 数 据 存 储 、 汇 总 数据 处 理 、 元 数据 管理 以 及 用 户 管理 和 权限 管理 等 数据 仓库 建设 的 
基本 过 程 。 

2. 便捷 的 报表 功能 

许多 商务 智能 系统 都 提供 了 友好 的 用 户 操 作 界 面 ， 使 用 户 可 以 轻松 地 创建 报表 ， 并 支持 
用 户 根据 实际 情况 制订 特殊 要 求 的 查询 ， 同 时 还 可 以 利用 报表 工具 自动 生成 报表 ， 而 不 用 像 
以 前 那样 要 通过 IT 专业 人 员 来 实现 业务 人 员 的 具体 报表 需求 。 例 如 ，SAP 公司 的 报表 工具 
Webi 即席 查询 和 Dashboard 水 品 易 表 就 提供 了 一 个 便捷 易 懂 的 图 形 化 操作 界面 ， 解 决 了 用 户 
写 SQL 语句 的 不 便 ， 用 户 借 助 鼠 标的 拖 中 和 单 击 即 可 进行 报表 或 查询 界面 的 生成 。 

3. 强大 的 数据 挖掘 能 

鉴于 数据 挖掘 和 分 析 功 能 是 商务 智能 系统 的 基本 功能 ， 各 商务 智能 厂商 都 非常 注重 这 方 
面 的 研究 ， 并 开发 了 各 种 功能 强大 的 分 析 挖 气 工 具 。 例 如 ，Cognos 公司 开发 的 OLAP 工具 
Powerplay, Oracle 公司 基于 数据 仓库 的 数据 挖掘 工具 Oracle Darwin, Oracle Express 产品 系列 
和 Oracle Discoverer, ， 都 具有 探索 数据 和 OLAP 功能 ， 可 以 帮助 企业 从 数据 中 挖掘 出 更 有 价 
值 的 信息 。 


£ 23% SAP 商务 智能 


上 一 章 介 绍 了 数据 仓库 和 商务 智能 的 定义 和 特点 ， 下 面 将 对 SAP 的 数据 仓库 和 商务 智 
能 解决 方案 (SAP BW) 进行 简要 介绍 ， 以 便 在 后 续 相 关 的 实际 开发 使 用 过 程 中 对 这 些 概 念 
不 至 于 太 过 陌生 。 


2.1 SAP 公司 简介 


ЗАР 公司 成 立 于 1972 年 ， 总 部 位 于 德国 沃 尔 多 夫 市 ， 是 全 球 最 大 的 企业 管理 软件 及 协 
同 商务 解决 方案 供应 商 ， 也 是 全 球 第 三 大 独立 软件 供应 商 。 通 过 mySAP 商务 套件 ， 全 球 各 
类 企业 可 以 改善 与 客户 、 伙 伴 的 关系 ， 精 细 企 业 运 作 ， 并 在 其 供应 链 管理 中 获得 显著 效益 。 
从 航空 航天 到 公共 设施 行业 ， 各 个 行业 独特 的 核心 业务 流程 都 由 SAP 的 28 个 行业 解决 方案 
支持 着 进行 有 效 运行 。 目 前 ， 全 球 有 120 多 个 国家 、 超 过 29 800 家 企业 正在 运行 着 100 600 
多 个 SAP 软件 。SAP EER 50 多 个 国家 拥有 分 支 机 构 ， 并 在 多 家 证 券 交 易 所 上 市 ， 包 括 法 
兰 克 福 证 券 交 易 所 和 纽约 证 券 交 易 所 。 

SAP 早 在 20 世纪 80 年 代 就 同 中 国 的 国营 企业 合作 并 取得 了 成 功 经 验 。1994 ÆR, SAP 
在 北京 建立 了 代表 机 构 ，1995 年 正式 成 立 SAP 中 国 公司 ，199%6 年 、1997 年 陆续 设立 上 海 和 
广州 分 公司 。 作 为 中 国 ЕВР 市 场 的 绝对 领导 者 ，SAP 的 市 场 份额 已 经 达到 30% ， 年 度 业绩 
以 50% 以 上 的 速度 递增 。 

ЗАР 荣获 的 主要 赞誉 如 下 : 

1996 年 : 欧洲 年 度 最 佳 公司 。 

1997 年 :《 计 算 机 世界 》Smithsonian 奖 。 

1998 年 : 最 佳 管理 公司 。 

1999 年 :《 财 富 》500 强 `、《 商 业 周 刊 》 全 球 科 技 百 强 、 最 佳 ERP 应 用 奖 。 

2000 年 : 英国 《金融 时 报 》“ 全 球 最 有 声誉 公司 ”前 30 强 、mySAP. com 荣获 “最 佳 电 

2001 年 :《 商 业 周刊 》 “全球 最 有 价值 品牌 ”、 美 国 《 环 球 财 经 》“ 全 球 最 佳 公司 ”。 

2002 E. 《福布斯 “全球 计算 机 软件 最 佳 企业 ”、 英 国 《 金 融 时 报 》“500 强 进 步 最 大 的 公 

司 ”。 
2003 年 :《 商 业 周 刊 》“ 全 球 1000 强 ” 排 名 第 98 位 ， 被 评 为 全 球 100 家 最 有 价值 公司 
= 


2.2 SAP 产品 系列 


SAP 成 立 之 初 只 有 SAP ЕВР 一 个 产品 ， 经 过 40 年 的 发 展 和 近 几 年 一 系列 的 商业 收购 ， 
目前 产品 线 已 经 覆盖 “业务 应 用 ” “商务 分 析 ”“ 数 据 库 及 其 技术 ”“ 移 动 应 用 ”和 “ 云 服 
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务 ” 五 大 板块 ， 包 含 从 企业 到 社交 等 多 个 场景 的 数 十 个 产品 类 别 ， 产 品 总 览 如 图 2-1 所 示 。 


SAP 云 服务 


行业 解决 方案 行业 解决 方案 
客户 关系 管理 
Allin CRM 
О R 


ne 了 


3j 


2 


Business 
Ву Design 


HERA 
BOSE 
FEE 


Netweaver 平台 企业 信息 管理 


平台 + Ж ВОР =) DI+DQ 


数据 库 (ASE) +HANA+ 数据 仓库 (IQ) 


2.2.1 业务 应 用 


从 最 开始 的 SAP ЕВР 开始 ，SAP 逐步 地 丰富 和 完善 了 整个 业务 应 用 各 个 环节 的 产品 ， 
目前 有 SAP ERP (Enterprise Resource Planning， 企 业 资 源 计 划 ) 、SAP CRM (Customer Rela- 
tionship Management， 客 户 关 系 管理 ) SAP SCM (Supply Chain Management， 供 应 链 管 理 ) 、 
SAP PLM ( Product Lifecycle Management， 产 品 生 命 周期 管理 ) SAP 相关 第 三 方 解 决 方案 以 
及 25 个 行业 的 行业 解决 方案 ， 这 部 分 内 容 一 般 也 被 称 作 商务 套件 (Business Suite) 。 

随 着 中 小 企业 开始 试图 采用 SAP 进行 企业 的 内 部 管理 和 业务 交易 ，SAP 在 商务 套件 之 
后 推出 了 适合 中 小 企业 的 应 用 。 中 型 企业 一 般 使 用 被 称 为 Business All in One 的 套件 ， 这 是 
商务 套件 的 精简 和 预 配 置 版 本 ; 而 最 小 的 企业 则 建议 使 用 ЗАР Business Опе (大 多 数 时 候 也 
FR BI); 介 于 两 者 之 间 的 企业 则 建议 使 用 SAP Business By Design， 这 是 一 个 包含 了 通用 功 
能 的 版 本 。 


2.2.2 商务 分 析 


SAP 的 商务 分 析 并 不 仅仅 包含 商务 智能 分 析 ， 还 包含 了 针对 大 型 企业 的 商务 分 析 应 用 和 
企业 监管 ， 以 及 针对 中 小 企业 的 特别 应 用 。 

处 于 最 核心 地 位 的 就 是 ЗАР 商务 智能 套件 的 解决 方案 ， 其 产品 主要 包括 SAP 收购 Busi- 
ness Object 公司 的 产品 ; EPM (Enterprise Performance Management， 企 业绩 效 管理 ) 、GRC 
( Governance/Risk Management Compliance， 合 规 / 风 险 管理 监管 ) PA (Predictive Analysis, 
预测 性 分 析 ) LOB 应 用 (Line Of Business， 业 务 条 线 分 析 ) 以 及 基于 其 上 的 行业 解决 
方案 。 


与 业务 应 用 相同 ， 在 分 析 领 域 ，SAP 也 推出 了 中 小 企业 解决 方案 。 中 型 企业 一 般 选用 


SAP BI Edge, ІНІ, ， 该 产品 包 只 是 商务 智能 套件 的 精简 版 本 ; 小 型 企业 一 般 建议 选用 SAP 
BOBJ Crystal 解决 方案 ， 这 主要 包括 了 Crystal Report 等 工具 ; 介 于 两 者 之 间 的 企业 则 建议 使 
FH SAP 的 Lumira 云 解 决 方案 


2.2.3 数据 库 及 其 技术 


SAP 从 成 立 最 初 就 建立 了 自己 的 系统 运行 平台 和 数据 库 平 台 ， 随 着 后 续 产品 线 的 不 断 扩 
充 和 收购 ， 逐 步 形 成 了 以 Netweaver 和 HANA 为 核心 的 技术 平台 和 数据 库 产品 。 

在 企业 集成 应 用 方面 ，SAP Netweaver 不 仅 作为 SAP 产品 的 基础 运行 平台 ,同时 也 是 企 
业 的 集成 平台 ， 通 过 SAP Netweaver 集成 SAP 和 非 SAP 应 用 ; 在 信息 的 集成 上 ， 则 有 属于 原 
Business Object 公司 的 DI (Data Integrator) 和 DQ (Data Quality) 产品 进行 数据 的 集成 。 

在 数据 库 上 ，SAP 公司 最 初 开发 的 SAP DB 并 没有 在 后 续 的 实际 使 用 中 派 上 大 用 场 ， 往 

只 是 作为 练习 或 演示 系统 的 数据 库 使 用 。 但 是 最 近 几 年 ， 通 过 对 Sybase УЮШУ, ШЕН 
РШ 代 列 式 存储 内 存 数 据 库 产品 НАМА 的 推出 ， 使 得 ЗАР 在 数据 库 领 域 得 到 了 很 
大 发 展 ， 形 成 了 以 HANA 数据 库 为 核心 ， 以 Sybase m" CASE) 和 数据 仓库 (10) 为 辅 
助 的 数据 库 产品 。 


2.2.4 移动 应 用 


随 着 苹果 公司 推出 的 iPhone 风靡 全 球 ， 新 的 移动 互联 时 代 已 然 到 来 ，SAP 也 不 失 时 机 
地 推出 了 自己 的 移动 商务 解决 方案 。SAP 的 移动 解决 方案 包括 移动 设备 安全 解决 方案 、SAP 
移动 平台 、 基 于 SAP ` 业务 系统 的 企业 内 部 管理 应 用 和 基于 SAP 商务 智 能 的 企业 外 部 应 用 。 

SAP 针对 企业 财务 管理 所 发 布 的 SAP Fiori 应 用 ， 将 传统 在 ERP 上 的 应 用 界面 和 功能 通过 
更 加 友好 、 简 便 易 操作 的 方式 进行 了 平台 的 移植 和 优化 ， 这 是 对 ЗАР ЕВР 的 一 次 提升 和 丰富 。 


2.2.5 去 服务 


随 着 “ 云 "“ 移 动 应 用 ”和 “大 数据 ”等 概念 的 普及 , “成 为 一 家 “ 云 ” 服务 提供 商 ” 
就 成 为 了 SAP 的 焦点 ，SPA 针对 云 服 务 推出 了 以 下 几 款 产品 。 

1. PaaS (Platform as a Service ， 平 台 即 服务 ) 

平台 即 服务 ， 即 把 服务 器 平台 作为 一 种 服务 提供 的 商业 模式 ， 主 要 通过 网 络 进行 程序 提 
供 的 服务 ， 以 云 计算 时 代 相 应 的 服务 器 平台 或 开发 环境 作为 服务 进行 提供 就 成 为 了 Paas, 
SAP 主推 基于 HANA 的 云 服务 平台 。 

2. SaaS (Sostware as a Service ， 软 件 即 服务 ) 套件 

在 基于 Paas 的 基础 上 ，SAP 推出 通过 Internet 提供 软件 的 模式 ， 将 应 用 软件 统一 部 署 在 
SAP 自己 的 服务 器 上 ， 客 户 可 以 根据 自己 的 实际 需求 ， 通 过 互联 网 向 SAP 定购 所 需 的 应 用 
软件 服务 。SAP 主推 面向 中 小 企业 的 Business By Design 服务 和 Business One Cloud 服务 。 

3. 面向 不 同业 务 条 线 场景 的 SaaS 

针对 不 同 的 业务 应 用 场景 ，SAP 推出 了 不 同 的 应 用 ， 包 含 针 对 人 员 在 线 管 理 的 Success 
Factor 、 针 对 供 应 商 在 线 管理 的 Ariba、 针 对 客户 在 线 管理 的 Hybris 和 针对 企业 内 部 财务 管理 
的 SAP Travel 差 旅 管理 解决 方案 


4. SaaS 社交 业务 

最 近 几 年 的 “社交 热 ” 和 “大 数据 热 ”， 催 生 了 一 批 基于 服务 的 社交 网 络 应 用 。SAP 的 
社交 SaaS 主要 分 为 两 大 部 分 ， 一 部 分 为 社交 媒体 ， 提 供 更 好 的 和 用 户 沟通 的 社交 解决 方案 ， 
被 称 为 Netbase; 另 一 部 分 是 用 于 社交 协作 的 应 用 ， 被 称 为 SAP Jam, 

5. NaaS (Network as а Service) 方案 

SAP 推出 的 Ariba 或 称 之 为 SAP Business Networks 的 方案 ， 是 一 个 巨大 的 网 络 服务 市 场 ， 
是 亿 万 企业 在 线 交 易 3 500 亿 欧 元 的 市 场 ，SAP 正在 努力 地 进入 这 样 一 个 动态 的 网 络 服务 
市 场 。 


2.3 SAP BW 数据 仓库 


SAP BW 是 mySAP 商务 智能 (BI) 的 集成 化 组 件 之 一 ， 为 SAP 数据 和 非 SAP 数据 的 采 
集 、 存 储 、 分 析 和 管理 提供 一 个 集成 的 、 面 向 用 户 的 平台 。 它 可 以 智能 化 地 管理 整个 企业 管 
理 信息 系统 的 海量 数据 并 从 中 挖掘 出 最 有 价值 的 信息 ， 以 向 企业 管理 者 提供 强 有 力 的 决策 支 
持 ， 从 而 使 企业 对 市 场 反应 更 灵敏 快捷 ， 整 个 企业 也 更 具有 生命 力 和 竞争 力 。 

BW 全 称 为 Business Information Warehouse, TE 3. 5 版 本 之 后 又 称 为 SAP Netweaver Busi- 
ness Intelligence， 但 是 在 2007 年 10 H, SAP 收购 Business Object 公司 之 后 ，BO 被 统称 为 SAP 
Business Intelligence， 因 此 BW 又 改 回 了 原来 的 名 字 ， 叫 作 SAP Business Information Warehouse , 
现在 被 归 为 EIM (Enterprise Information Management) 产品 类 中 ， 为 前 端 展 现 提 供 强 大 的 数据 
文 持 。 


2.3.1 BW 出 现 的 背景 


企业 资源 计划 (Enterprise Resources Planning， 简 称 ERP) ， 特 别 是 SAP ЕВР 系统 的 成 功 
实施 和 应 用 ， 在 使 企业 流程 规范 化 的 同时 ， 也 使 企业 信息 系统 的 处 理 数据 量 呈 指数 性 增长 。 
对 企业 管理 者 来 说 ， 相 当 程 度 上 ， 企 业 管理 就 是 “对 信息 的 管理 ”， 大 量 、 准 确 、 及 时 的 数 
据 无 疑 就 像 一 座 “ 高 品位 ”的 金 矿 一 样 ， 会 让 其 兴奋 不 已 。 不 过 ， 面 对 这 庞大 诱 人 的 “人 金 
矿山 ”， 要 想 快捷 、 有 效 地 从 中 挖掘 出 真正 的 “金子 ” ， 还 需要 装备 相当 精良 的 工具 。 

BW 就 是 这 样 一 件 企业 决策 者 亚 需 的 “ 采 金 器 ” ， 它 也 被 认为 是 众多 可 以 满足 业务 需求 
的 数据 仓库 系统 中 功能 最 强 的 一 个 : 满足 SAP 和 非 ЗАР 系统 的 整合 ;丰富 的 数据 转换 工具 ; 
强大 的 数据 加 载 引 擎 和 机 制 ; 易于 使 用 的 前 端 报 表 ; 集成 的 Web 报表 ; 集成 、 简 单 、 易 用 
的 Dashboard 水 唱 易 表 。 通 过 数据 抽取 工具 将 不 同 的 SAP 和 非 SAP 系统 的 数据 集成 到 BW 
中 ， 使 得 信息 分 析 员 和 决策 者 都 可 以 迅速 获得 来 自 不 同系 统 且 高 度 集成 化 的 信息 ， 以 进行 数 
据 的 分 析 ， 提 供 准 确 的 综合 性 报表 以 及 商务 智能 功能 ， 所 有 这 些 都 使 得 BW 成 为 独特 的 、 可 
满足 不 同 用 户 需 求 的 数据 仓库 系统 和 商务 智能 系统 。 

2.3.2 BW 的 优势 

1. 无 缝 的 数据 集成 

一 家 企业 ， 特 别 是 大 型 或 特大 型 企业 ,， 极 有 可 能 同时 采用 不 同 的 在 线 交 易 系 统 
(OLTP) ， 也 有 可 能 因为 种 种 原因 ， 有 系统 覆盖 不 到 的 地 方 ， 因 此 种 类 不 一 的 系统 和 数据 来 
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源 使 以 往 的 开 系 统 难 以 用 单一 的 解决 方案 将 各 方面 数据 协调 而 全 面 地 整合 起 来 。BW 强大 
的 数据 集成 功能 ， 使 BW 可 以 从 任何 系统 上 收集 和 组 织 操作 层 数据 ， 并 使 数据 适用 于 分 析 处 
理 ， 进 而 成 为 “知识 ”。 操 作 层 数据 是 指 用 于 人 处 理 正在 进行 的 商业 运作 的 各 种 业务 数据 ， 包 
括 ERP ( Enterprise Resource Planning) , CRM ( Customer Relationship Management), 5СМ 
(Supply Chain Management) , SRM (Supplier Reltionship Management) , PLM ( Product Lifecy- 
cle Management) 和 其 他 非 SAP 系统 ， 甚 至 是 Excel 表格 或 其 他 数据 仓库 中 的 数据 ， 因 此 大 
大 提高 了 企业 信息 的 完整 性 和 有 效 性 。 

需要 说 明 的 是 ， 正 是 因为 BW 对 SAP 全 系 产 品 有 着 天 然 无 颖 的 集成 优势 ， 所 以 在 绝 大 
部 分 企业 都 能 看 到 在 SAP ЕВР 成 功 实施 之 后 ，BW 便 被 当 作 企 业 的 数据 仓库 单独 建设 ， 甚 至 
在 少数 地 方 ， 即 使 企业 选 型 的 数据 仓库 不 是 BW， 但 是 仍然 会 将 BW 作为 数据 抽取 器 来 使 
用 ， 从 而 成 为 SAP ERP 系统 和 数据 仓库 系统 之 间 的 数据 传输 桥梁 。 

2. 强大 的 报表 功能 

从 商业 或 技术 的 角度 来 说 ， 目 前 的 许多 报表 系统 都 不 完善 。 它 们 或 是 不 能 提供 及 时 的 信 
息 , 使 企业 难以 做 出 较 精 确 的 预测 ， 或 是 只 能 掌控 单方 面 的 数据 ， 仪 仅 覆 盖 到 公司 运营 的 很 
小 部 分 。 对 SAP ЕВР 系统 来 说 ， 如 果 要 搜索 较 长 时 间 的 历史 数据 ， 还 会 大 大 影响 系统 的 性 
能 ,使 得 前 端 业务 操作 受到 影响 。BW 将 预先 定义 的 数据 从 相应 系统 中 提取 出 来 并 加 以 清 
洗 、 转 换 和 加 载 ， 使 用 户 可 以 随时 根据 自己 的 需求 进行 在 线 分 析 。 由 于 分 析 的 过 程 不 影响 其 
他 事务 操作 系统 ， 因 此 使 其 他 系统 的 性 能 得 以 提高 。 此 外 ，BW 中 信息 块 数据 结构 的 多 维 性 
也 使 报表 的 内 容 更 丰富 ， 黎 盖 面 更 广 ， 参 考 价 值 更 高 。 

3. 贴近 业务 分 析 实 际 

世界 知名 杂志 《财富 》 提 到 :“ 低 于 10% 的 企业 战略 被 真正 有 效 执行 ”。 因 此 ， 如 何 制 
定 企业 战略 规划 ， 如 何 监控 企业 战略 规划 的 执行 情况 ， 是 每 个 企业 赖 以 生存 并 良好 成 长 的 关 
键 。 很 多 企业 的 决策 者 都 会 定期 通过 数字 的 方式 来 考察 企业 的 经 营 状 况 ， 如 现金 流量 、 品 牌 
市 场 占有 率 、 销 售 指标 完成 率 等 ， 这 些 数字 被 称 为 企业 关键 绩效 指标 ( Key Performance Indi- 
cator, KPI), BW 真正 智能 的 特性 便 在 这 里 得 以 完美 体现 ， 这 是 个 由 上 至 下 并 循环 往复 的 过 
程 。 BW 将 所 有 企业 需要 的 KPI 通过 数据 模型 进行 设计 ， 其 基于 角色 的 功能 使 用 户 可 以 对 自 
己 关 心 的 行动 计划 加 以 实时 监控 ， 并 得 到 迅速 、 全 面 的 评 佑 。BW 也 可 以 模拟 决策 结果 ， 对 
潜在 问题 提前 预警 。 这 些 智能 优势 大 大 提高 了 决策 者 的 决策 能 力 ， 加 快 了 他 们 对 信息 处 理 的 
反应 速度 ， 也 使 他 们 能 够 抓 住 主要 问题 或 问题 的 主要 方面 。 企 业 通过 使 用 BW， 进行 智 能 化 
运作 ， 得 到 完整 有 效 的 信息 ， 使 企业 价值 链 中 的 内 、 外 成 员 可 以 更 有 效 地 进行 交流 和 开展 合 
作 ， 在 重要 信息 分 析 的 基础 上 及 时 发 现 问 题 、 解 决 问题 、 预 测 发 展 趋势 、 做 出 战略 决策 、 降 
低 经 营 风 险 ， 从 而 达到 企业 效益 最 大 化 。 

4. 完善 的 权限 管理 体系 

由 于 BW 服务 器 端 还 是 基于 SAP Netweaver 平台 (无 论 是 基于 传统 关系 型 数据 库 ， 还 是 
基于 SAP HANA 数据 库 ) ， 因 此 权限 管理 体系 和 SAP ERP 系统 基本 保持 一 致 。 用 户 所 有 权限 
的 获得 都 是 通过 管理 员 给 予 的 授权 角色 来 限定 ， 只 有 被 授权 的 用 户 才能 进行 相关 操作 ， 默 认 
的 权限 为 空 ， 即 任何 操作 也 无 法 进行 ,在 这 一 权限 设计 体系 下 有 以 下 几 个 相关 概念 : 

1) 用 户 账号 和 密码 。 业 务 用户 申 请 的 系统 账号 和 密码 ,在 Web 页 面 下 可 以 使 用 制作 
0 - Key 的 方式 保证 安全 ， 也 可 以 使 用 同 企业 域 联合 使 用 LDAP 的 方式 来 保证 安全 。 
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2) 角色 。 角 色 是 用 户 权 限 的 主要 构成 部 分 。 角 色 中 包含 了 不 同 的 权限 对 象 、 字 段 和 字 
段 值 ， 以 此 产生 权限 需要 的 参数 文件 。 

3) 参数 文件 。 制 作 完毕 的 权限 角色 在 激活 时 会 产生 权限 参数 文件 ， 在 用 户 实施 各 种 操 
作 行为 时 ， 系 统 通过 对 比 当 前 操作 需要 的 权限 和 用 户 已 经 被 赋予 的 权限 参数 文件 来 判断 该 用 
户 是 否 满 足 相 关 的 操作 权限 要 求 。 

5. 丰富 的 业务 目录 

在 实际 的 项 目 实施 过 程 中 ， 如 果 所 有 建设 内 容 都 从 零 开 始 ， 则 项 目的 进展 进度 可 想 而 
AU, ЖАМ ЛЕ, ， 正 是 基于 这 一 点 ， 并 结合 SAP 在 企业 管理 方面 的 经 验 ， 在 BW 中 
内 置 了 针对 各 个 主题 和 不 同 分 析 需 求 的 成 熟 模 型 ， 只 需 激 活 它们 即 可 使 用 或 作为 参照 ， 这 就 
大 大 降低 了 项 目 实施 的 风险 ,减少 了 项 目 工 作 量 ， 提 高 了 项 目 实施 的 效率 。 

内 置 在 BW 内 部 的 业务 内 容 既 包括 构建 数据 仓库 所 必需 的 特性 、 关 键 指 标 、 数 据 源 、 信 
息 源 、 信 息 包 、 转 换 、 数 据 传输 处 理 和 处 理 链 节点 类 型 等 基本 对 象 ， 也 包括 数据 存储 对 象 
DSO、 信 息 块 Cube、 多 信息 提供 者 MultiProvider、 最 终 的 查询 Query 以 及 权限 角色 等 内 容 。 
概括 起 来 说 就 是 ， 除 开 用 户 名 和 密码 没有 预先 配置 外 ， 能 够 想到 的 模型 对 象 都 已 经 存在 于 系 
统 中 了 。 


2.3.3 BW 的 未 来 发 展 


SAP 在 ERP 市 场 具 有 绝对 的 领导 地 位 ， 已 拥有 40 多 年 历史 的 SAP 公司 是 世上 公认 的 ERP 
巨头 ,在 ЕВР 市 场 上 具有 领先 地 位 。 目 前 ，87% 以 上 的 世界 500 强 公司 都 已 在 使 用 ЗАР, SAP 
在 全 球 有 超过 1 千 万 用 户 ， 有 29 800 家 公司 安装 了 56 000 £ SAP 软件 。 应 该 说 ，SAP 在 全 球 
拥有 数 以 万 计 的 用 户 ， 这 些 用 户 大 都 拥有 强 有 力 的 国际 市 场 ， 非 常 明白 资料 整理 和 分 析 对 其 未 
来 决策 有 极为 重要 的 影响 ， 这 些 用 户 已 开始 和 计划 不 遗 余力 地 在 BW 上 进行 投资 。 
通过 多 年 的 探索 和 实践 ，BW 在 很 多 企业 进行 了 成 功 的 实施 ， 业 务 涵盖 财务 、 成 本 、 采 
购 、 生 产 、 库 存 、 销 售 、 项 目 、 人 事 和 市 场 等 方面 ， 在 一 定 程度 上 对 企业 自身 业务 水 平 的 提 
高 、 成 本 控制 和 企业 管理 信息 化 都 起 到 了 很 大 的 促进 作用 。 随 着 最 近 几 年 各 种 新 思潮 的 普及 
和 新 技术 的 引进 ， 在 传统 的 BW 实施 的 基础 上 又 出 现 了 以 下 一 些 新 的 趋势 。 

l. 数据 仓库 系统 的 整合 

国内 大 部 分 企业 在 数据 仓库 建设 中 ， 原 来 基本 上 还 是 按照 数据 集 市 模式 进行 ， 虽 然 对 于 
部 门 应 用 文 持 尚 可 ， 但 是 在 集团 层面 应 用 支持 来 看 ， 蜂 部 门 应 用 存在 不 足 ， 目 前 这 些 企 业 都 
在 考虑 重新 规划 ， 按 照 EDW 技术 路 线 进行 数据 仓库 的 建设 。 

2. ERP 数据 和 非 ERP 数据 的 集成 

基于 SAP ERP 基础 上 延续 建设 的 BW 系统 ， 早 期 主要 是 从 ERP 系统 抽取 数据 。 但 是 对 
于 经 营 管理 而 言 ，ERP 中 的 数据 不 够 全 面 ， 如 计划 数据 、 生 产 数据 、 市 场 营 销 数据 、 竞 争 
对 手数 据 和 物流 数据 等 都 有 可 能 不 在 ЕВР 系统 中 进行 管理 ， 因 此 大 力 扩展 数据 仓库 的 数据 
源 范围 ， 也 是 当前 企业 的 重要 发 展 趋势 。 

3. BW 和 BOBJ 相 结 合 

最 开始 的 商务 智能 实施 往往 只 是 实施 了 BW 产品 ， 并 且 主 要 使 用 Excel 展示 动态 分 析 及 
包含 分 析 结果 的 格式 化 报表 (BIER), ， 少 数 企 业 使 用 SAP ЕР (Enterprise Portal) 进行 
Web 报表 的 展现 。 随 着 SAP 在 2007 年 收购 了 Business Object 公司 之 后 ， 大 部 分 的 前 端 展 现 
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就 被 放 到 了 BOBJ 上 来 处 理 ， 如 通常 使 用 的 Webi 即席 查询 和 动态 图 形 化 的 Dashboard 等 。 通 
it BW + ВОВЈ 的 方式 ， 将 主要 的 数据 获取 、 清 洗 、 加 载 、 管 理 等 工作 交 给 BW, ， 而 前 端 展现 
则 主要 由 BOBJ 负责 。 

4. 内 存 计 算 技 术 的 应 用 

单个 BW 模型 在 数据 量 超过 1 亿 条 后 ， 当 用 户 查 询 不 能 命中 预先 处 理 好 的 集合 时 ， 查 询 
性 能 难以 令 人 满意 ， 导 致 用 户 执行 数据 的 随意 浏览 和 分 析 时 性 能 很 差 ， 因 此 国内 企业 都 在 积 
极 采用 新 的 SAP HANA 内 存 计算 技术 ， 以 提高 查询 性 能 ， 如 农夫 山泉 、 联 想 集 团 、 上 海 大 
众 等 企业 都 在 逐步 采用 SAP. НАМА 数据 库 以 替代 原先 的 关系 型 数据 库 软 件 。 

5. 大 数据 应 用 

随 着 SAP HANA 内 存 数据 库 的 推出 ，SAP 不 断 地 丰富 其 既 有 产品 线 上 的 产品 在 HANA 
数据 库 上 的 应 用 。 最 新 迹象 表明 ，SAP 正在 不 断 地 通过 SAP HANA 平台 工具 Smart Data 
Access 集成 大 数据 平台 的 数据 ， 以 彻底 解决 非 结 构 化 数据 的 访问 和 存储 问题 。 


2.4 BW 系统 架构 


作为 MySAP 商务 智能 的 核心 组 件 ，BW 提供 了 数据 仓储 功能 、 商 务 智能 平台 和 一 整套 
商务 智能 工具 ， 所 有 这 些 能 确保 企业 最 大 化 地 利用 其 所 收集 的 信息 。BW 中 可 以 集成 、 转 换 
和 整合 来 自 SAP 应 用 系统 和 所 有 外 部 数据 源 的 相关 业务 信息 。BW 提供 灵活 的 报表 和 分 析 工 
有 具 以 支持 需要 评估 和 说 明 的 数据 ， 并 为 数据 分 发 提供 便利 。 企 业 能 据 此 分 析 、 制 定 完善 的 决 
策 ， 并 确定 以 目标 为 导向 的 经 营 管理 活动 。 

图 2-2 定义 了 SAP 认为 是 BW 系统 关键 组 件 的 内 容 。 在 此 系统 架构 中 ， 最 主要 的 三 层 


I 是 数据 仓库 层 、 商 务 智能 平台 和 业务 信息 展现 层 。 
BEx 工具 集 


— Query Designer 

— Report Designer 

— Web Application 
Designer 

— BEx Analyzer 
(基于 Microsoft 
Excel) 

— BEx Web 
Analyzer 

- BEx 常规 分 析 功 能 

一 信息 广播 

- 门户 集成 


分 另 


. 
。 层 次 结构 
。 货 币 /单位 
= 计划 
- Analysis Process 
Designer 


写 接口 


ЕЕ 
m 


开放 式 接口 和 Web 服务 


图 2-2 BW 的 三 层 体 系 架构 
最 左边 是 数据 仓库 层 ， 在 这 一 层 里 主要 完成 的 任务 包括 : ETL 流程 (Extraction Transfor- 
mation Loading) 、 数 据 仓 库 管 理 和 商业 建 模 三 块 内 容 。 其 中 ，ETL 流程 通过 各 种 途径 和 方 
法 ， 把 种 类 繁多 的 原始 数据 进行 处 理 和 清洗 ， 从 而 转化 为 系统 所 需 的 统一 格式 的 数据 类 型 ， 
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以 便 后 续 所 有 的 分 析 需 要 ， 是 BW 中 非常 基础 且 非 常 关键 的 一 步 。 之 后 的 数据 仓库 管理 则 将 
这 些 数 据 根据 种 类 ， 划 分 成 主 数据 、 操 作 数据 、 多 维 数据 等 不 同 的 类 别 加 以 管理 。 商 业 建 模 
则 是 数据 仓库 中 比较 难 掌握 的 内 容 ， 这 块 内 容 基本 上 是 和 客户 的 需求 紧密 联系 ， 并 根据 需求 
建立 合适 、 高 效 的 模型 。 商 业 建 模 也 不 是 一 天 两 天 的 理论 学 习 能 够 完全 领会 到 的 ， 这 需要 很 
多 项 目 经 验 的 逐步 积累 。 

中 间 第 二 层 是 商务 智能 平台 ， 该 平台 是 BW 中 偏重 逻辑 处 理 的 一 块 ， 它 把 数据 仓库 的 数 
据 ， 按 照 需求 进行 各 种 计算 、 规 划 和 进一步 的 细致 处 理 ， 这 一 层 更 多 地 是 对 数据 进行 统一 的 
处 理 和 基本 的 封装 。 在 这 一 层 中 完成 的 工作 包括 : 业务 逻辑 计算 、 计 划 和 预测 、 例 外 扫描 、 
业务 预警 、 报 表 预 计算 、 数 据 缓 冲 、 后 台 打 印 和 数据 挖掘 等 ， 主 要 的 工具 有 : 在 线 分 析 人 处 
理 、 数 据 挖 掘 、 分 析 流 程 设 计 (Analysis Process Design，APD) 、 业 务 计 划 和 模拟 BPS (新 版 
本 的 计划 又 称 为 BW - ІР, В Integrated Planning) 。 

右边 第 三 层 是 业务 信息 展现 层 ， 就 是 通过 商务 智能 工具 对 商务 智能 平台 中 存储 的 内 容 进 
行 再 加 工 ， 加 入 一 些 商 务 智能 的 要 素 ， 如 Query 查询 的 多 样 化 选择 、 自 动 报表 的 生成 、 多 维 
度 的 数据 分 析 、 信 息 发 布 、 公 开 的 面向 第 三 方 的 分 析 接 口 和 具体 的 Web 页 面体 现 等 。 有 了 
业务 信息 展现 层 ，SAP 的 BW 才 显 得 更 为 全 面 和 专业 。 

1. ЖЯ 

源 系 统 是 向 BW 提供 原始 数据 的 系统 。 这 些 系统 既 可 以 是 类 似 SAP ERP, SAP CRM, SAP 
SRM, SAP SCM, SAP PLM 这 样 的 SAP 产品 ， 也 可 以 是 客户 自己 基于 Oracle 或 SQL Server НХЕ 
义 开 发 的 应 用 系统 ， 还 可 以 是 临时 组 成 的 文本 文件 内 容 等 。 图 2-3 展示 了 在 BW 中 可 能 使 用 
到 的 源 系统 的 类 别 。 


源 系统 技术 名 称 


口 外 部 系统 PARTNERS 
> Гу FILE 
> Сане DB 

Ou 连接 UDC 
> C web 服务 WEB 


图 2-3 BW 系统 的 源 系 统 类 型 

2. SAP 系统 

BW 可 无 缝 集成 来 自 mySAP 商务 套件 中 的 任何 系统 ， 此 时 其 作用 相当 于 中 央 数 据 存储 
管理 工具 。 对 于 商务 套件 中 的 源 系 统 来 说 ，SAP 交付 预定 义 的 提取 接口 结构 和 程序 ， 这 些 工 
具 人 允许 将 mySAP 商务 套件 中 的 数据 直接 加 载 到 BW 中 。 在 实际 使 用 过 程 中 ， 有 时 布局 甚至 
更 加 复杂 ， 因 为 企业 复杂 的 组 织 结构 有 可 能 产生 包括 多 个 BW 系统 的 体系 架构 ， 在 可 以 将 数据 
传输 给 中 央 BW 以 执行 综合 报表 之 前 ， 子 BW 系统 会 临时 地 以 详细 的 组 织 单位 形式 存储 数据 。 

除了 BW 系统 直接 连接 原始 系统 以 外 ， 还 可 以 使 用 SAP РІ (Process Integration, PI) 将 
SAP ЖІЗЕ SAP 系统 中 的 数据 发 送 到 BW。 需要 说 明 的 是 ，PI 的 数据 传输 基于 SOAP 协议 ， 
此 就 成 为 了 开放 的 工业 标准 接口 方式 。 

3. JE SAP 系统 

BW 的 一 大 优势 在 于 能 够 很 好 地 集成 用 户 自 定义 的 系统 ， 或 其 他 软件 厂商 提供 的 系统 。 
因此 ， 我 们 可 以 使 用 BW 作为 数据 集成 平台 ， 以 便 编制 涵盖 整个 组 织 的 报表 ， 这 一 特点 对 异 
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构 系 统 布局 来 说 尤为 重要 。 

4. 数据 提供 商 

除了 能 获取 来 自 企业 内 部 各 种 系统 的 数据 外 ，BW 还 可 以 从 商业 数据 提供 商 处 获得 以 目标 
为 导向 的 数据 。 例 如 ，AC Nielsen 或 Dun & Bradstreet 提供 的 市 场 调 查 数 据 ， 这 些 数据 可 以 加 
3:8] BW 中 作为 基准 ， 然 后 根据 企业 自身 的 需要 去 衡量 自己 的 运营 数据 。 用 于 集成 商业 数据 提 
供 商 所 提供 的 数据 接口 可 以 直接 在 BW 中 激活 使 用 ， 这 表明 商业 数据 可 以 顺利 地 导入 运行 。 

5. 数据 库 (数据 库 连 接 ) 或 复杂 源 (通用 数据 集成 UDI) 

除了 在 应 用 层 的 数据 集成 外 ，BW 还 允许 在 数据 库 层面 进行 数据 的 集成 。BW 允许 加 载 
来 自 外 部 的 关系 型 数据 库 系统 ， 或 由 第 三 方 驱动 程序 (ODBO M JDBC) 提供 的 复杂 数据 源 
的 数据 。 在 集成 的 过 程 中 ，BW 会 基于 外 部 表 结 构 对 应 生成 数据 源 的 结构 ， 从 而 确保 快速 且 
一 致 地 将 表 内 容 加 载 到 BW 中 。 

6. BW 服务 器 

BW 服务 器 是 数据 仓库 的 “ 容 身 之 所 ”， 它 提供 中 央 管 理 区 域 ， 其 特色 在 于 完善 的 传输 
引擎 和 先进 的 BW 数据 库 。 传 输 引 擎 控制 源 系 统 中 的 数据 加 载 流 程 ， 并 处 理 和 准备 其 数据 。 
BW 数据 库存 储 元 数据 、 已 准备 的 主 数据 和 交易 数据 。 

数据 仓库 工作 台 (Data Warehouse Workbench, DWW) 负责 系统 模型 的 组 织 和 管理 整个 
数据 仓库 ， 也 就 是 说 ， 完 成 对 所 有 数据 获取 流程 的 设 定 、 监 控 和 维护 。 我 们 可 以 使 用 数据 仓 
库 工 作 台 来 管理 和 控制 所 有 相关 的 BW 对 象 和 流程 、 定 义 所 有 相关 信息 对 象 、 通 过 触发 器 来 
安排 加 载 流程 ， 以 及 使 用 监控 工具 监控 系统 运行 。 

不 过 ， 在 以 合适 的 形式 存储 数据 之 前 ， 必 须 按照 抽取 、 转 换 和 加 载 (Extraction Transfor 
mation Loading, ETL) 流程 来 准备 这 些 数据 。BW 的 数据 获取 方法 如 图 2-4 所 示 。 


数据 获取 层 ， 架 构 IN 

BAPI 在 ЖАҚ 

NetWi 7: 

DataSource/ 持久 数据 加 载 区 域 ран 不 
可 用 


相关 的 源 多 维 源 
如 IBMDB2 和 Яд Hyperion 如 SAP CRM 如 CSV 通过 来 自 如 Oracle 和 
Teradata 基于 互联 网 的 Financials 
应 用 程序 
源 系统 类 型 


2-4 BW 的 数据 获取 方法 
7. 用 于 BW 的 数据 源 
除了 无 颖 集成 mySAP Business Suite 组 件 的 相关 系统 外 ，BW 还 可 以 加 载 其 他 不 同类 型 
的 源 数 据 。 
e 平面 文件 : BW 标准 可 以 自动 读 取 格式 为 ASCII[、 逗 号 分 隔 值 (CSV). Office Excel X: 
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ft (XLS/XLSX). 的 平面 文件 。 

e 其 他 业务 系统 : 通过 业务 接口 BAPI (Business Application Program Interface, BAPI) 的 
方式 接收 数据 。 

e 其 他 数据 仓库 中 的 多 维 数据 。 

e XML: XML 数据 也 可 以 在 BW 中 进行 处 理 ， 在 许多 情况 下 通过 SAP PI 进行 预 处 理 。 

e 其 他 数据 库 中 的 关系 数据 。 

8. 数据 加 载 技术 

数据 可 以 通过 不 同 的 技术 进行 加 载 ， 所 有 这 些 技术 都 由 SAP 提供 ， 有 具体 情况 视 所 涉及 


的 数据 类 型 而 定 。 


e 数据 库 连 接 : 允许 直接 访问 关系 型 数据 库 。 在 这 里 ， 数 据 库 连接 用 于 在 外 部 数据 库 中 
创建 与 数据 库 管 理 系 统 (DBMS) 的 连接 。 通 过 导入 元 数据 和 原始 数据 ， 可 以 在 BW 
中 生成 对 应 的 结构 ， 并 且 可 以 轻松 、 有 效 地 加 载 数 据 。 

e UD 连接 (Universal Data Connect, UD Connect): 使 用 UD 连接 ，BW 几乎 可 以 访问 所 
有 的 关系 和 多 维 的 数据 来 源 。UD 连接 会 将 多 维 存储 作为 平面 数据 进行 转换 和 传输 ， 
此 技术 在 J2EE 引擎 上 运行 ， 并 文 持 PEE 连接 带 架 构 。 

e SAP 源 系统 : 通过 BW Service АРІ (Service Applicaiont Program Interface, Service АРІ 
或 SAPI) 将 SAP 系统 连接 到 BW。Service АРІ 是 SAP 源 系 统 中 的 一 个 技术 程序 包 ， 它 
便于 实现 从 SAP 应 用 系统 到 BW 的 无 颖 数据 传输 ， 因 此 它 允 许 在 SAP 源 系统 和 BW 
之 间 进 行 通 信 。 在 SAP 源 系统 中 安装 Service API， 作 为 软件 组 件 Plug - In Basis 的 一 
部 分 (从 ECC 5.0 之 后 ，SAP ERP 的 该 组 件 会 被 自动 安装 ) 。 

e 文件 系统 : 对 于 平面 文件 ，SAP 支持 自动 导入 的 格式 为 XLS/XLSX, CSV, ASCI 等 
的 文件 。 

e Web 服务 : 基于 SOAP 协议 ， 用 于 读 取 XML 数据 ， 并 在 BW 服务 器 上 存储 该 数据 。 
在 许多 情况 下 ， 当 加 载 基于 XML 的 数据 时 使 用 SAP PI (Process Integration, PI) 。 

9， 转 换 

由 于 数据 从 源 系统 中 提取 出 来 并 最 终 要 传输 到 数据 仓库 中 ， 因 此 在 分 析 使 用 之 前 需要 先 


清洗 这 些 数 据 ， 有 时 还 需要 对 其 进行 复杂 逻辑 的 再 处 理 (有 时 也 称 之 为 合并 处 理 )。 自 BW 
7.0 开始 ， 这 一 过 程 通过 新 的 可 视 转 换 工 具 完 成 。BW 中 的 转换 和 数据 传输 如 图 2-5 所 示 。 


SAP Netweaver BW 


92-5 BW 中 的 转换 和 数据 传输 


10. 数据 的 物理 存储 
从 源 系 统 提 取 数 据 并 进行 清洗 、 转 换 后 ， 需 要 (在 大 多 数 情况 下 ) 物理 存储 该 数据 。 
在 对 数据 进行 清洗 和 转换 后 ， 除 持久 数据 加 载 区 域 ( Persistent Storage Area, 简称 PSA) 外 
的 所 有 框 都 存储 该 数据 ， 如 图 2-6 所 示 。PSA 保留 数据 的 原始 格式 (不 进行 转换 )。 尽 管 其 
他 框 都 代表 已 清洗 的 数据 ， 但 是 会 以 不 同 的 技术 对 象 来 存储 不 同 详细 级 别 的 数据 。 
数据 仓储 的 概念 层 


物理 数据 存储 4 


持久 数据 加 载 区 志 


任何 来 源 


图 2-6 BW 中 的 物理 数据 存储 


这 种 背景 下 的 数据 仓库 指 的 是 将 非常 详细 的 数据 (如 大 型 零售 商 的 仓库 ) 保留 相当 长 
的 时 间 ， 其 目的 是 保存 我 们 可 能 知道 也 可 能 不 知道 的 必需 信息 。 在 仓库 中 保留 这 些 信息 使 所 
有 目前 和 将 来 的 报表 需求 变 得 更 加 容易 实现 。 

操作 型 数据 存储 是 为 包含 低层 次 操作 需求 的 详细 数据 而 专门 设计 的 。 在 大 多 数 情况 下 ， 
此 区 域 中 的 的 数据 不 会 保存 大 量 的 历史 信息 。 

最 后 一 部 分 数据 集 市 是 使 用 数据 库 对 象 设计 而 成 ， 这 些 数据 库 对 象 会 汇总 和 集中 存储 具 
有 长 期 参考 价值 的 数据 ， 大 多 数 BW 信息 需求 都 应 该 产生 于 此 区 域 。 


2.5 BW 中 的 对 象 


251 数据 仓库 工作 台 


数据 仓库 工作 台 (Data Warehouse Workbench, DWW) 是 BW 系统 的 核心 工具 。 它 负责 
系统 模型 的 组 织 和 整个 数据 仓库 的 管理 ， 也 就 是 说 ， 完 成 对 所 有 数据 获取 流程 的 设 定 、 监 控 
和 维护 。 我 们 可 以 使 用 数据 仓库 工作 台 来 管理 和 控制 几乎 所 有 的 BW 对 象 和 流程 、 定 义 所 有 
相关 的 信息 对 象 、 通 过 触发 器 来 安排 加 载 流 程 ， 以 及 使 用 监控 工具 来 监控 这 些 流程 科 

数据 仓库 工作 人 台 的 功能 如 图 2-7 所 示 ， 以 下 是 对 数据 仓库 工作 台 功 能 的 定义 : 

1) 建 模 : 创建 数据 库 对 象 和 与 之 相关 的 其 他 对 象 ， 如 转换 和 数据 传输 处 理 等 。 

2) 管理 : 计划、 监控 和 管理 数据 上 载 作业 。 

3) 传输 连接 : 将 开发 环境 的 模型 传输 到 目标 系统 (如 测试 环境 和 生产 环境 ) 的 专用 
LR, 
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计划 


。 计 划 数 据 传输 
。 加 载 数 据 


Data 
Warehousing 
Workbench 


图 2-7 数据 仓库 工作 台 的 功能 


4) 文档 /凭证 : BW 系统 所 有 文档 的 中 央 管 理工 具 ， 可 以 通过 上 载 相关 对 象 的 文档 并 在 
查询 中 予以 展现 。 

5) 业务 内 容 : 在 BW 系统 内 部 ， 预 先 定义 好 的 各 式样 的 对 象 ， 包 括 信息 块 、DSO WA, 
转换 和 数据 传输 进程 等 ， 可 以 激活 之 后 直接 使 用 。 

6) 翻译 : 将 已 经 建设 的 内 容 翻译 为 不 同 种 类 的 目标 语言 。 

7) 元 数据 库 : 系统 管理 员 和 开发 人 员 可 以 在 此 查找 有 关 业 务 内 容 的 模型 对 象 和 自 定 义 
的 模型 对 象 的 详细 信息 ， 包 括 对 象 的 定义 以 及 与 之 相关 的 上 下 游 数据 流 图 等 信息 。 

要 想 了 解 管理 员工 作 台 的 主要 职能 ， 首 先 需 要 从 建设 和 管理 数据 仓库 两 个 环节 来 进行 了 
解 ， 因 为 这 些 是 关键 的 任务 。 图 2-8 所 示 的 是 BW 的 声明 周期 管理 。 


元 数据 入 
文档 管理 


运行 EDW 


图 2-8 BW 的 声明 周期 管理 


在 第 一 个 分 组 ， 即 建设 EDW。 数 据 建 模 意 味 着 创建 对 象 ， 如 信息 块 和 DSO 对象。 数据 
获取 将 设计 数据 流 ， 以 便 把 数据 加 载 到 BW 系统 的 PSA 中 。 从 本 质 上 来 讲 ， 转 换 则 是 对 数 
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据 清洗 和 合并 整理 的 过 程 。 数据 分 配 指 的 是 建立 类 似 InfoSpoke 的 对 象 ， 以 定义 和 跟踪 从 
BW 系统 发 送 到 其 他 系统 的 数据 。 而 在 上 面 的 建 模 过 程 中 ， 元 数据 和 文档 管理 贯穿 整个 设计 
建 模 的 全 过 程 。 

在 第 二 个 分 组 ， 即 运行 EDW， 是 指定 期 执行 各 项 任务 ， 以 保证 BW 系统 的 顺畅 运行 。 
管理 和 监控 侧重 于 数据 的 装载 和 陈旧 数据 或 不 准确 数据 的 清除 。 数 据 流 控制 就 是 BW 处 理 链 
的 维护 和 监控 ， 正 是 因为 有 了 处 理 链 才 能 将 数据 仓库 运行 过 程 中 涉及 的 所 有 定期 任务 有 序 地 
组 织 起 来 。 例 如 ， 从 业务 的 各 个 方面 (财务 、 成 本 、 和 采购、 生产 、 销 售 、 库 存 、 项 目 和 工 
厂 维 护 等 ) 来 装载 和 转换 数据 ， 或 在 午夜 将 查询 结果 进行 离线 发 送 。 性 能 优化 则 是 分 析 查 
询 、 装 载 性 能 并 更 改 系 统 参 数 和 模型 设计 ， 以 改善 BW 系统 性 能 的 流程 。 在 运行 EDW 的 过 
程 中 ， 用 户 管理 贯穿 整个 运行 的 全 过 程 。 

1. ÆR 

建 模 功能 区 域 用 于 创建 和 维护 BW 系统 中 与 数据 加 载 流 程 有 关 的 〈 元 ) 对象， 如 信息 
块 和 DSO 对 象 等 。 这 些 对 象 在 树 型 结构 中 显示 ， 在 该 结构 中 ， 对 象 按 层次 结构 标准 进行 了 
排序 ， 可 以 使 用 右键 菜单 访问 分 属于 对 象 树 中 的 各 对 象 的 相关 维护 对 话 和 功能 ， 如 图 2-9 
所 示 。 


Е 日 回回 
数据 仓储 工作 台 (A) 编辑 (E) 转 到 (G) TAT) IAN) 设置 (5) 系统 (Y) 帮助 (H) 
@ | a agieeoe Bas meos mag ед.) 


数据 仓储 工作 台 : 建 模 
пееја IIB] | [e| es] | Ie 


© NODESNOTCONNECTED NODESNOTCONNECTED 
Ф RFID 独立 解决 方案 ФАП 
b Ф 技术 内 容 0BWTCT 
了 Ф SINO 信息 范围 SINO 
= @ siNo 信息 块 01 SINOCO1 
= [X] RSDS 51400501 PC, FILE -> CUBE SINOC01 0LIVN6PCPUSYNORWLLIERMGS9UPG7303 


% 开放 数据 目标 文件 
Шен 
收藏 


Е SINOCO4 
о SINOCO4 SINOIS04 DD9WLVXPPSHMRJ6AJSIBODAG 
© 2 SINO 第 四 个 信息 源 SINOIS04 
T % 0 从 51401504 为 外 部 文件 系统 51401504 PC FILE 
R о SINOIS04 51401504 EE EE 
时 信息 块 CO1 ici 
图 


演示 基于 FM 虚拟 信息 提供 商 
拟 关 键 指标 

拟 关键 指 标 V1 

关键 指标 V2 


料 
演示 层次 结构 D5O 


2 05 (1) в12 [|0138 [ом [_ [7 


2-9 BW 的 系统 界面 一 一 建 模 


通过 选择 “数据 仓库 工作 台 ” 导航 窗 口中 的 “ 建 模 ” 选 项 ， 可 以 实现 对 建 模 功 能 区 域 
的 访问 。 

2. 管理 

使 用 “管理 ”列表 中 的 监控 标签 ， 可 以 在 BW 系统 中 监控 和 控制 数据 加 载 流 程 以 及 任 
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何其 他 的 数据 处 理 。 通 过 “数据 仓库 工作 台 ” 中 的 监控 器 文件 夹 图 标 ， 可 以 访问 所 有 类 型 
的 监控 器 。 在 此 可 以 监控 一 切 数据 ， 包 括 对 进入 BW 系统 的 数据 执行 输入 监控 以 及 对 从 BW 
系统 传输 到 其 他 系统 的 数据 进行 输出 监控 。 监 探 管理 中 的 另 一 重要 功能 是 对 处 理 链 进行 创建 
执行 和 监控 (虽然 大 多 数 情况 下 ， 更 加 愿意 使 用 事物 码 RSPC 进行 处 理 ) ， 如 图 2-10 所 示 。 
这 个 图 形 的 计划 和 监控 工具 允许 主 数据 和 交易 数据 加 载 间 存在 复杂 的 相关 性 ， 而 有 旦 允许 在 
BW 中 执行 其 他 复杂 任务 逻辑 ， 如 一 段 自 定义 的 АВАР 程序 。 


F ТЕГЕ 
设置 (5) 系统 (Y) 帮助 (H) 
[v] 


s agiedoe!ÓigS) Sess ога 


进程 链 显示 计划 视图 
ЕЕ ПІ? 


描述 /描述 
ЕЗІ 


Z 虹 管 理 主 控 室 
Imp 

各 更 改 运行 
жн 

е ЕУ 

d? sugli ЖИЕ 
proi 
CEHE 

® кетен 
35 业务 智能 对 象 的 分 析 
口 当前 的 设置 


| 2 в (1) ві aoso] [7 


2-10 BW 的 系统 界面 一 一 管理 


尽管 以 上 标签 是 最 重要 的 ， 但 是 有 关 其 他 标签 的 一 些 详细 信息 同样 值得 探讨 。 

3. 传输 连接 

所 有 SAP 产品 都 有 一 个 重要 的 技术 要 求 ， 即 管理 开发 、 测 试 和 生产 环境 之 间 的 元 数据 
和 配置 设置 。 由 于 具备 了 文 持 BW 的 特殊 功能 ， 因 此 通用 于 所 有 SAP 产品 的 传输 工具 都 得 
到 了 增强 。 我 们 可 以 使 用 传输 连接 来 收集 最 近 在 BW 系统 中 创建 或 修改 的 对 象 ， 也 可 以 使 用 
更 改 与 传输 组 织 器 (СТО) 把 这 些 对 象 传输 到 其 他 BW 系统 中 。 例 如 ， 从 开发 机 传输 到 测试 
系统 ， 然 后 传输 到 生产 系统 。 

通过 选择 “数据 仓库 工作 台 ” 导 航 窗口 中 的 “传输 连接 ”选项 ， 即 可 访问 传输 连接 功 
能 区 域 。 
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4. ШЕ 

使 用 凭证 功能 ， 可 以 在 各 种 格式 、 版 本 和 语言 的 文档 间 为 BW 对 象 添加 、 搜 索 和 创建 链 
接 ， 这 些 文档 链接 又 会 在 后 续 的 分 析 报 表 中 按 需 体现 。 
通过 选择 “数据 仓库 工作 台 ” 导航 窗口 中 的 “和 凭证 ”选项 ， 即 可 访问 和 凭证 功能 区 域 。 

5. 业务 内 容 

业务 内 容 提供 基于 元 数据 的 预 配置 信息 模型 ， 包 括 预先 定义 好 的 各 式 各 样 的 对 象 ， 包 括 
言 息 块 、DSO 对 象 、 转 换 和 数据 传输 进程 等 。 业 务 内 容 为 用 户 提供 了 模板 模型 ， 所 以 可 以 
直接 激活 业务 目录 中 的 对 象 从 而 建立 数据 仓库 ， 也 可 以 通过 参照 业务 内 容 中 的 对 象 ， 创 建 所 
需要 的 对 象 ， 不 管 采用 哪 种 方式 ， 都 大 大 节约 了 数据 仓库 建设 的 时 间 、 降 低 了 系统 实施 的 风 
险 、 提 高 了 建设 的 效率 。 
通过 选择 “数据 仓库 工作 台 ” 导航 窗口 中 的 “业务 内 容 ” 选 项 ， 即 可 访问 业务 内 容 功 
能 区 域 ， 也 可 以 使 用 事务 RSORBCT 实现 访问 。 

6. 翻译 

在 “翻译 ”功能 区 域 ， 可 以 翻译 属于 BW 对 象 的 长 、 短 文本 。 例 如 ， 对 于 一 个 中 国人 
mA, 查找 “销售 分 析 ” 的 查询 将 要 比 查 找 “Analyse de Ventes". 的 查询 简单 得 多 。 
通过 选择 “数据 仓库 工作 台 ” 导航 窗口 中 的 “翻译 ”选项 ， 即 可 访问 翻译 功能 区 域 。 

7. 元 数据 仓库 

所 有 BW 对 象 及 其 数据 流 信 息 都 在 使 用 HTML 展示 的 BW 元 数据 仓库 中 集中 管理 。 在 集 
成 的 元 数据 仓库 浏览 器 中 ,借助 于 搜索 功能 ， 可 以 快速 地 访问 各 种 对 象 。 其 他 功能 还 包括 在 
不 同系 统 间 交换 元 数据 ， 导 出 列 有 元 数据 的 HTML 页 ， 以 及 显示 对 象 的 图 形 等 。 
通过 选择 “数据 仓库 工作 台 ” 导航 窗口 中 的 “元 数据 仓库 ”选项 ， 即 可 访问 元 数据 仓 
库 功 能 区 域 。 


2.5.2 信息 提供 者 


信息 提供 者 (InfoProvider) 是 一 个 可 以 在 BEx 中 为 其 创建 或 执行 查询 的 对 象 ， 信 息 提供 
者 有 时 是 物理 对 象 ， 有 时 是 用 于 报表 的 逻辑 “视图 ”。 该 定义 正确 传达 出 : 信息 提供 者 既 可 
是 实际 数据 库 表 中 数据 的 物理 存储 ， 也 可 以 是 虚拟 的 数据 集合 (与 视图 类 似 )， 只 是 临时 
集合 数据 便于 将 其 输入 到 查询 中 ,但 不 永久 存储 数据 。 我 们 主要 关注 两 个 主要 的 物理 信息 提 
供 者 : 信息 块 (InfoCube) 和 数据 存储 对 象 (Data Storage Object)。 在 接 下 来 的 “其 他 
Provider” 中 ， 将 涉及 更 复杂 的 虚拟 信息 提供 者 。 

1. 信息 块 (Infocube) 

信息 块 是 用 于 支持 BW 查询 的 主要 对 象 ， 由 多 维 数据 模型 构成 ， 旨 在 长 时 间 存 储 汇总 数 
据 和 集合 数据 。 设 计数 据 仓 库 的 目的 是 确保 大 多 数 查 询 最 初 以 这 种 类 型 的 数据 库 对 象 为 日 
标 。 简 化 后 的 信息 块 结构 如 图 2-11 所 示 。 

2. 数据 存储 对 象 (DSO) 

DSO 是 BW 中 使 用 的 另 一 个 主要 物理 数据 库存 储 对 象 ， 由 二 维 数据 模型 构成 ， 旨 在 存储 
非常 详细 (事务 级 别 ) 的 记录 。 尽 管 DSO 也 是 BW 行业 使 用 的 术语 ， 但 它 的 技术 定义 不 是 
标准 的 。DSO 的 数据 结构 如 图 2-12 所 示 。 
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物料 信息 
物料 编号 
物料 名 称 
物料 组 

物料 颜色 


时 间 信 息 
日 
月 
季度 
年 度 


图 2-11 信息 块 的 数据 结构 


DataStore 对 象 : 交易 层级 详细 信息 示意 图 


销售 订单 
DataStore 对 象 
销售 订单 编号 代码 为 交易 层级 提供 
销售 订单 项 目 编号 了 唯一 标识 


图 2-12 数据 存储 对 象 DSO 的 数据 结构 

3. 关键 信息 提供 者 的 技术 集成 

DSO 和 信息 块 构 成 了 仓库 的 物理 存储 。 图 2-13 显示 了 这 些 对 象 在 企业 级 数据 仓库 

(EDW) 的 整体 设计 过 程 中 的 所 处 位 置 。 在 整个 企业 级 数据 仓库 中 ， 这 些 对 象 或 其 他 性 能 增 
强 对 象 使 用 的 正确 与 否决 定 着 整个 数据 仓库 项 目的 成 败 。 


信息 访问 
| 
InfoCube 
(架构 式 ) 


运营 
物理 数据 存储 T 


持久 数据 加 载 


DataStore 
对 象 
任何 来 源 


2-13 BW 系统 内 的 信息 集成 
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言 息 提 供 者 可 以 在 事务 RSA1， 即 数据 仓库 工作 台中 创建 、 维 护 和 显示 。 通 过 选择 “ 建 
模 ” 一 “信息 提供 者 ”选项 ， 可 以 访问 到 它们 (或 者 通过 事务 代码 RSDCUBE 和 RSDODS 
来 访问 ) 。 

信息 范围 〈 图 标 免 ) 是 组 织 信息 提供 者 和 信息 对 象 的 文件 来。 在 构建 信息 提供 者 之 前 ， 
需要 了 解 所 谓 的 信息 对 象 (Infoobject) ， 它 们 是 构成 信息 提供 者 的 基础 ， 是 BW 系统 特有 的 
称谓 。 


Eg =) Ë] < 
| 数据 仓储 工作 台 (A) _ 编 辑 (E) 转 到 (6) 工具 (T) IAN) 设置 (5) 系统 (Y) 帮助 (H) ЕТУ” 
[е — ааш се ЕЕЕ om 


数据 仓储 工作 台 : 建 模 
ЖЕЛЕ СЛЕД ЕЕ | [eon [s] | | 


@ 信息 提供 者 | 区 Га [лї NET TI fists 
9 NODESNOTCONNECTED NODESNOTCONNE... 


Ж велне 

із 

2 fps E CN IR ASINO WAR 
REER SINOCO2 


D 开放 数据 目标 文件 DEAE 
@ 演示 基于 FM 虚拟 信息 提供 商 SINOVCO1 


Шен 
=] 收藏 天 


b бзан SINOVKF 
b Өр 虚拟 关键 指标 V1 Vl 

b @ 虚拟 关键 指标 V2 v2 

> ы GOWL 

b 国 演示 层次 结构 DSO ZHIERDSO 


信息 对 象 


з 


105 (1) 812 [9] 0138 | OVR 


2-14 BW 中 的 信息 提供 者 目录 


2.5.3 信息 对 象 


1. 信息 对 象 的 重要 性 

言 息 对 象 (Infoobject) 是 BW 中 最 小 的 可 用 信息 元 素 或 字段 ， 它 们 可 以 通过 技术 名 称 唯 
一 识别 。 

在 BW 系统 中 的 业务 评估 对 象 被 看 作 是 信息 对 象 。 它 们 可 分 为 特性 〈 如 公司 代码 、 客 户 、 
物料 和 供应 商 等 ) 、 关 键 值 (如 数量 、 价 格 和 金额 等 ) 、 单 位 〈 如 货币 或 数量 单位 ) 、 时 间 特 性 
(如 会 计 年 度 和 日 历年 月 等 ) 和 技术 特性 〈 如 请 求 编号 、 数 据 包 号 和 数据 记录 号 等 ) 。 

言 息 对 象 在 整个 系统 中 处 于 最 基础 的 位 置 ， 用 于 创建 存储 数据 的 结构 和 表 ， 这 使 得 信息 
能 够 以 结构 化 的 形式 存储 。 此 外 ,信息 对 象 还 用 于 定义 报表 。 图 2-15 所 示 的 是 信息 对 象 在 
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BW 系统 中 能 够 被 使 用 到 的 对 象 概览 。 


DataStore == 性 xm 层次 结构 
1 з. 35 x) 
象 在 


BW 系统 中 的 使 用 


图 2-15 信息 


2. 信息 对 象 的 分 类 

如 前 面 所 述 ， 信 息 对 象 主要 分 为 两 大 类 型 ， 即 特性 和 关键 指标 。 关 键 指标 就 是 我 们 认为 
的 交易 指标 ， 通 俗 一 些 来 说 就 是 数量 和 金额 等 指标 。 特 性 是 用 来 衡量 关键 指标 的 分 析 维 度 ， 
如 当 我 们 说 销售 人 额 100 万 的 时 候 ， 信 息 并 不 明朗 ,但 是 如 果 说 1000 公司 2014 年 1 月 的 销售 
额 为 100 万 的 时 候 ， 信 息 就 会 更 加 明确 化 ， 此 信息 中 的 特性 公司 代码 ( 值 为 1000)、 日 历年 
度 〈 值 为 2014) 、 月 度 ( 值 为 1) 都 是 特性 。 

特性 按照 不 同 的 用 途 又 进一步 分 为 一 般 特 性 、 时 间 特 性 、 技 术 特 性 和 单位 特性 。 以 下 是 
言 息 对 象 类 型 的 完整 清单 : 

(1) 关键 指标 

(2) 特性 

D 一般 特性 

(9) 时 间 特 性 

(9) 技术 特性 

(4) 单位 特性 

关键 指标 提供 了 需要 被 分 析 的 值 ， 以 下 是 关键 指标 的 两 个 例子 : 

CD 数量 (0QUANTITY) 

©) 金额 (0AMOUNT) 

一 般 特性 是 用 来 分 析 关 键 值 的 业务 参考 对 象 ， 是 BW 系统 中 使 用 最 多 的 特性 。 以 下 是 一 
般 特 性 的 两 个 例子 : 

CD 成 本 中 心 (0COSTCENTER ) 

@ 物料 (OMATERIAL) 

时 间 特 性 构成 了 数据 分 析 和 评估 的 时 间 参 考 对 象 ， 是 与 BW 系统 一 起 交付 的 ， 最 初 的 
BW 系统 就 有 这 些 对 象 ， 即 使 没有 安装 业务 目录 的 BW 系统 也 有 。 以 下 是 时 间 特 性 的 两 个 
例子 : 

O HJH (0CALDAY) 一 一 具有 最 高 粒度 的 时 间 特 性 
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©) 日 历年 (OCALYEAR) 或 会 计 年 度 (OFISCYEAR) 一 一 具有 最 低 粒 度 的 时 间 特 性 

单位 特性 可 以 与 关键 值 一 起 指定 。 它 们 使 关键 指标 的 具体 数值 在 评估 过 程 中 与 其 对 应 的 
单位 一 同 出 现 。 以 下 是 单位 特性 的 两 个 例子 : 

(D 货币 单位 (OCURRENCY) 一 一 包括 交易 货币 (美元 和 欧元 等 ) 

© 价值 单位 (OUNT) 一 一 包括 计量 单位 (加仑 、 英 寸 、 厘 米 、 件 ) 

技术 特性 是 在 BW 中 对 数据 进行 组 织 的 对 象 。 以 下 是 技术 特性 的 两 个 例子 : 

(D 请 求 标识 (0REQUID) 一 一 系统 在 加 载 请 求 时 分 配 的 编号 

@ 更 改 标识 (0DATAPAKID) 一 一 加 载 请 求 时 顺序 编码 的 数据 包 

3. 信息 对 象 的 特性 

特性 用 来 分 析 关 键 指标 ， 如 有 关键 值 销 售 额 100 万 , 但 是 如 果 没 有 特性 对 这 个 100 万 的 
数字 进行 分 析 ， 那 就 不 知道 这 个 100 万 的 销售 额 到 底 是 什么 意思 。 当 不 断 增加 特性 ， 如 
“客户 C001 销售 额 100 万 ”、 更 进一步 “2011 年 客户 C001 销售 额 100 万 ”、 更 进一步 
“2011 年 客户 C001 物料 组 M001 销售 额 100 万 ”， 这 样 一 来 销售 额 100 万 这 个 关键 指标 就 会 
不 断 地 、 更 加 清晰 地 出 现在 我 们 面前 。 所 以 可 以 说 特性 用 于 分 析 关 键 值 。 

我 们 可 以 在 “数据 仓库 工作 台 ” 导 航 窗口 的 “ 建 模 ”功能 区 域 选择 “信息 对 象 ”选项 
进行 集中 维护 ， 也 可 以 使 用 事物 码 RSDI 来 维护 单个 的 信息 对 象 。 信 息 对 象 的 维护 是 通过 维 
护 界 面 中 的 标签 页 来 定义 特性 信息 对 象 并 更 改 这 些 设置 的 〈 部 分 属性 在 设 定之 后 即 无 法 更 
改 ， 除 非 删 除了 所 有 使 用 该 对 象 的 相关 交易 数据 ， 所 以 在 设 定 的 过 程 中 需要 根据 实际 业务 谨 
慎 操 作 ) 。 在 定义 特性 之 前 ， 首 先 需要 准确 了 解 这 些 标签 页 的 具体 定义 内 容 。 

维护 界面 包含 下 列 标签 页 : 

Q 常规 (有 些 版 本 也 称 为 “一 般 的 ”) 

Ө 业务 浏览 

© 主 数据 /文本 

D 属性 (依赖 于 主 数据 /文本 中 的 定义 ) 

@ 层次 结构 

@ 组 合 

在 决定 维护 标签 之 前 ， 必 须 详细 说 明 具 有 主 数 据 的 特性 的 概念 。 如 果 一 个 特性 指定 属 
性 、 文 本 或 层次 结构 表 与 之 相 链 接 ， 来 提供 有 关 该 特性 的 其 他 信息 ， 那 么 该 特性 就 称 为 具有 
主 数据 的 特性 。 这 时 就 应 该 由 相关 业务 流程 和 特性 来 决定 是 否 应 该 启用 和 生成 后 台 主 数据 
表 。 许 多 情况 下 ， 它 们 提供 满足 报表 所 需 的 重要 信息 ， 如 公司 代码 的 所 在 国家 、 缺 省 货 
所 使 用 的 会 计 年 度 变 式 等 。 
通过 在 信息 对 象 维护 的 标签 页 中 选择 相应 的 文本 、 主 数据 或 层次 结构 页 签 ， 可 以 启用 具 
有 主 数据 的 特性 。 如 果 选 中 了 这 些 选项 中 的 任意 一 个 ， 那 么 该 特性 就 会 被 看 作 是 具有 主 数据 
的 特性 。 

1. 一 般 的 

“一 般 的 ”标签 页 用 于 确定 特性 的 基本 属性 ( 见 图 2-16)， 如 描述 、 数 据 类 型 、 数 据 长 
Ж (注意 ， 最 多 60 个 字符 ， 所 以 超过 60 个 字符 的 文本 处 理 需 要 借助 ABAP 平台 其 他 方面 的 
TOR) 以 及 转换 例 程 (INPUT 和 OUTUT 函数 ， 如 ALPHA 的 函数 就 是 CONVERSION_EXIT_ 
ALPHA INPUT AOUTPUT)。 此 外 ， 勾 选 “ 小 写字 母 ” 复 选 框 后 ， 系 统 认 为 大 小 写 是 有 区 别 
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的 ， 即 “ABC” 和 “abc” 是 有 区 别 的 ， 和 否则 系统 在 存储 数据 时 ， 都 会 以 大 写字 母 进行 存 
储 。 值 得 说 明 的 是 ， 在 需要 存储 汉字 时 (代码 为 汉字 ， 而 不 是 描述 为 汉字 ) ， 需 要 勾 选 “小 
写字 母 ” 复 选 框 。“ 仪 属性 ” 复 选 框 决定 了 该 特性 是 否 可 以 用 来 单独 评估 关键 指标 ; “特性 
是 文档 属性 ” 复 选 框 决 定 了 是 否 需 要 针对 该 特性 进行 文档 的 管理 ,包括 上 和 载 和 删除 等 ， 以 
便 在 BW 系统 的 其 他 地 方 使 用 ， 如 在 查询 中 ;“ 常 数 ” 文 本 框 决定 了 在 整个 BW 系统 中 该 对 
象 的 值 ， 如 果 填 写 了 这 一 属性 ， 那 么 在 后 续 的 所 有 建 模 中 ， 必 须 给 该 对 象 赋予 指定 的 常数 


值 ， 否 则 就 会 出 现 报 表 无 数据 等 情况 ， 所 以 一 般 不 建议 填写 该 属性 。 
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ЖОПЫ ізден | о 主 数据 /文本 口 层次 结构 , D 属性 
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数据 元 素 JBIC/OIDEMOCHAR OREHE 
数据 类 弄 ШЕРІ aj | 负责 人 
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图 2-16 信息 对 象 的 “一 般 的 ”标签 页 


2. 业务 浏览 

“业务 浏览 器 ”标签 页 用 于 设置 与 查询 相关 的 属性 〈 见 图 2-17) 。 其 中 , “显示 ”决定 
了 特性 的 显示 方式 〈 不 显示 、 代 码 、 文 本、 代码 和 文本 、 文 本 和 代码 ) ; “文本 类 型 ”决定 
了 特性 显示 文本 时 的 默认 文本 〈 短 文本 、 中 文本 、 长 文本 ) ; “业务 浏览 器 描述 ”决定 了 该 
特性 显示 在 浏览 器 中 的 文本 类 型 (短文 本 、 长 文本 ) ; “选择 ”决定 了 查询 的 集合 方式 ， 如 
果 选 择 了 “每 一 单元 格 的 唯一 性 ”选项 ， 那 么 在 定义 查询 时 就 不 能 同时 限制 多 个 值 ， 系 统 
也 就 不 能 基于 该 对 象 进行 行 、 列 或 单元 格 的 多 个 对 象 汇总 ; “查询 定义 的 过 滤器 值 的 选择 ” 
决定 了 在 定义 查询 时 ， 对 该 特性 进行 限制 时 出 现 的 列表 值 ( 仅 信息 提供 者 中 的 值 、 主 数据 
表 中 的 值 ) ; “查询 执行 时 的 过 滤器 值 的 选择 ”决定 了 在 执行 查询 时 ， 对 该 特性 进行 限制 时 
出 现 的 列表 值 〈 仅 过 账 导航 的 值 、 仅 信息 提供 者 中 的 值 、 主 数据 表 中 的 值 ) ; “查询 执行 中 
的 过 滤器 值 显示 ”决定 了 在 执行 查询 时 过 滤器 中 该 特性 的 显示 方式 (不 含 值 的 选择 器 框 、 含 
值 的 选择 器 框 、 仅 输入 字段 、 含 输入 帮助 的 输入 字段 、 单 选 按钮 、 下 拉 框 、 仅 输入 帮助 、 复 
ҮЗЕ). 。 如 果 在 属性 中 输入 了 单位 或 货币 的 属性 ， 则 可 以 在 “基本 计量 单位 ”和 “货币 属 
性 ”中 选择 需要 的 单位 和 货币 。 

此 外 ， 在 “BEx Map" 上方 有 一 个 “相关 的 权限 ” 复 选 枉 。 从 BW 7.0 开始 ， 所 有 的 报 
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Ta [жна Б] 业务 内 容 E) 

特性 DEMOCHAR 
сан атн 

шені 演示 特性 

版 本 а жан n 已 保存 
对 象 枯 态 Æ жар, 可 执行 


选择 无 选择 限制 

查询 定义 的 过 滤器 值 的 选择 主 数据 表 中 的 值 

查 词 执行 的 过 滤器 值 的 选择 仅 过 账 导航 的 值 

查询 执行 中 的 过 涛 器 值 显示 不 含 值 的 选择 器 杠 E 
基本 计量 单位 | 

计 里 单位 特征 回回 

货币 属性 

相关 的 权限 


z 
aü 
业务 浏览 器 描述 简短 描述 a 
a 
a 
a 


BExMap. | Ен й 
地 理 类 型 无 地 理 特性 ШЕ. 
地 理 属性 | 


上 载 成 形 文件 地 震 记 录 转 换 装 置 下 载 (所 有 


地 震 记 录 转 换 装置 下 载 ES 


图 2-17 信息 对 象 的 “业务 浏览 器 ”标签 页 


表 权 限 和 数据 读 取 权限 都 通过 “分 析 权 限 ” 来 处 理 ， 如 果 需 要 在 系统 中 校 验 用 户 对 于 数据 
的 访问 ， 则 必须 勾 选 此 复 选 框 ; 同样 地 ， 如 果 勾 选 了 此 复 选 框 ， 则 必须 要 对 用 户 赋予 对 应 的 
分 析 权 限 ， 否 则 用 户 不 仅 不 能 查看 包含 该 特性 的 信息 提供 者 所 产生 的 报表 ， 其 至 在 对 信息 块 
或 DSO 进行 数据 上 载 和 查看 时 ， 系 统 都 会 报错 ， 而 开发 人 员 往 往 对 该 错误 不 知道 应 如 何 
处 理 。 

界面 最 下 端的 “Bex Map” 则 可 同 Атс GIS 配合 使 用 ， 在 地 图 上 显示 相关 分 析 数 据 。 

3. 主 数据 /文本 

在 “ 主 数据 /文本 ”标签 页 ( 见 图 2-18) 中 ， 可 以 确定 特性 是 否 包 含 附 加 属性 或 描述 
文本 。 

如 果 需 要 使 得 该 信息 对 象 拥有 其 自己 的 属性 ， 那 么 需要 勾 选 “有 主 数据 ” 复 选 框 ， 具 
体 的 属性 对 象 将 在 “属性 ”标签 页 中 维护 。 维 护 了 信息 对 象 的 属性 列表 和 属性 的 特点 (是 
否 时 间 相 关 ， 即 随 着 时 间 的 改变 而 发 生 改 变 ; 是 否 用 于 导航 分 析 特 性 所 在 信息 提供 者 的 关键 
НА) 后 ， 系 统 会 根据 前 台 输 入 对 象 生成 存储 主 数据 的 相关 透明 表 。 其 中 ,“P” 表 ， 即 透 
明 表 /BIC/PDEMOCHAR， 包 含 了 所 有 与 时 间 无 关 的 属性 ;“Q” 表 ， 即 透明 表 /BIC/QDEMO- 
CHAR, 包含 了 所 有 与 时 间 相 关 的 属性 ; “X” 表 ， 即 透明 表 /BICZXDEMOCHAR 包含 了 所 有 
与 时 间 无 关 的 导航 属性 ;“Y” 表 ， 即 透明 表 /BICAYDEMOCHAR， 包含 了 所 有 与 时 间 相 关 的 
导航 属性 。 更 加 详细 的 表 结 构 将 在 “属性 ”标签 页 中 介绍 。 

如 果 需 要 使 得 该 特性 拥有 其 自己 的 文本 ,那么 需要 勾 选 “ 融 文 本 ” 复 选 框 ， 并 且 选 择 
至 少 一 个 文本 选项 (短文 本 、 中 等 文本 或 长 文本 ， 即 20、40 或 60 个 字符 ) 。 选 择 了 具有 描 
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Та [не ПІРІ ІШЕТЕЗЕІЕНІ 


特性 |DEMOCHAR 
长 文本 描述 演示 特性 
简要 描述 演示 特性 
版 本 о “| 激活 的 m 已 保存 
HRS 活动 ,可 执行 
E UNES ЧЕТЕ о 层次 结构 ио 属性 / а 
四 有 主 数据 Муж 
主 数据 表格 文本 表格 属性 
主 数 据 志 的 视图 /BIC/MDENOCHAR | | 文本 表 /BIC/TDEMOCHAR | 
EXE /BIC/PDEMOCHAR | 短文 本 存在 
SID 表 属性 /BIC/XDEMOCHAR 中 等 长 度 文本 已 经 存在 
存在 长 文本 
主 数据 表 (相关 时 间 ) [BIC/QDENOCHAR 
Біз |/BIC/YDEMOCHAR 器 文 本 语言 相关 
: | 口 文 本 与 时 间 相关 
口 主 数据 维护 与 权限 相关 кеде - = 


62-18 信息 对 象 的 “ 主 数据 /文本 ”标签 页 1 
述 文 本 后 ， 在 激活 信息 对 象 时 ， 系 统 会 生产 一 个 “T” 表 ， 对 DEMOCHAR， 即 生成 /BIC/ 
TDEMOCHAR 透明 表 ， 其 表 结 构 将 由 前 台 的 选择 决定 。 除 了 文本 的 类 型 ， 还 有 “文本 语言 
相关 ”和 “文本 与 时 间 相 关 ” 两 个 复 选 框 。 在 多 语言 环境 下 ， 如 中 文 和 英文 ， 需 要 勾 选 
“文本 语言 相关 ” 复 选 框 。 文 本 描述 随 着 时 间 的 变化 而 变化 ， 如 物料 的 名 称 ， 则 需要 勾 选 
“文本 与 时 间 相 关 ” 复 选 框 。 

在 复杂 的 公司 结构 环境 下 ， 可 能 需要 对 主 数据 的 维护 进行 权限 的 区 分 ， 如 “工厂 ” 信 
息 对 象 有 以 P = 开头 的 值 和 以 C = 开头 的 值 ， 如 果 需 要 不 同 的 人 维护 不 同 的 主 数据 ， 则 需要 
勾 选 “ 主 数据 维护 与 权限 相关 ” 复 选 框 ， 同 时 在 权限 角色 中 使 用 权限 对 象 “S_RS_IOMAD” 
进行 限制 ， 并 且 在 字段 “RSIOBJNM” 中 维护 对 应 的 主 数据 技术 名 称 。 

在 “ 主 数据 /文本 ”标签 页 中 还 可 以 直接 指定 以 下 属性 〈 见 图 2-19 ) ; 
主 数 据 信息 源 / 数据 目标 / 信息 提 人 世 者 / 主 数据 读 存 取 
[ 具有 直接 更 新 的 信息 源 

应 用 程序 组 件 
[特性 是 信息 提 世 者 


信息 范围 
口 特性 用 于 导出 数据 源 


主 数据 访问 默认 © 
主 数 据 读 取 类 名 称 E 


主 数据 读 取 类 参数 
图 2-19 信息 对 象 的 “ 主 数据 /文本 ”标签 页 2 


1) 应 用 程序 组 件 。 当 信息 对 象 被 创建 了 
能 够 修改 与 信息 源 对 应 的 应 用 程序 组 件 。 

2) 信息 范围 。 当 包含 主 数据 的 信息 对 象 被 执行 了 “插入 特征 作为 信息 提供 者 ” 
以 在 此 信息 范围 看 到 对 应 的 信息 范围 ， 此 时 也 可 以 在 此 修改 对 应 的 信息 范 
仓库 工作 台中 进行 拖 放 操作 。 


| 


“直接 更 新 的 信息 源 ” 时 ， 此 时 在 白色 框 体内 


时 ,可 
围 ， 而 不 用 在 数据 
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3) 特性 用 于 导出 数据 源 。 当 需要 将 本 信息 对 象 中 包含 的 属性 和 文本 导出 到 目标 BW Ж 
统 或 其 他 数据 仓库 系统 时 ， 请 勾 选 此 复 选 框 。 

4) 主 数据 访问 。 主 数据 访问 选项 决定 了 用 户 在 执行 BW Query 时 对 于 主 数 据 的 读 取 方 
X, 它 有 3 个 选项 ， 即 “ 缺 省 ”、“ 自 己 执行 ”和 “远程 ”。 当 选择 “ 缺 省 ”选项 时 ， 系 统 
显示 特征 的 主 数据 表 中 的 值 ， 当 选择 “自己 执行 ”选项 时 ， 可 以 通过 指定 АВАР 类 来 自己 
执行 对 主 数 据 的 访问 ， 需 要 说 明 的 是 ， 此 ABAP 类 必须 从 类 CL_RSMD_RS_BW_SPEC 中 继 
Ж, 当 将 特征 标记 为 使 用 “远程 ”的 信息 提供 者 或 信息 源 时 ， 则 可 在 源 系统 中 远程 访问 对 
应 的 主 数据 ， 使 用 此 选项 的 前 提 条 件 是 对 应 主 数据 信息 源 必 须 连 接 到 所 需 的 源 系统 的 数据 
源 ， 由 于 系统 间 传 输 数 据 需 要 消耗 时 间 和 资源 ， 因 此 这 一 选项 一 般 来 说 并 不 推荐 使 用 。 

4. 属性 

按照 顺序 ， 本 处 应 该 介绍 “层次 结构 ”标签 页 ， 但 是 因为 上 面 介 绍 了 “ 主 数据 /文本 ” 
标签 页 ， 而 主 数据 的 透明 表 生 成 是 由 “属性 ”标签 页 中 的 设 定 决定 的 ， 因 此 将 “属性 ” 标 
签 页 提 到 前 面 进 行 讲解 。 同 时 需要 说 明 的 是 ， 如 果 需 要 看 到 “属性 ”标签 页 ， 则 首先 必须 
在 “ 主 数据 /文本 ”标签 页 中 多 选 “有 主 数据 ” 复 选 框 。 
属性 用 于 更 加 详细 地 描述 特性 的 信息 对 象 ， 属 性 可 以 是 别 的 特性 或 关键 值 。 例 如 ， 可 以 
用 有 关 对 象 的 公司 代码 、 对 象 创建 人 或 对 象 的 货币 和 单位 信息 来 更 加 详细 地 描述 一 个 对 象 ， 
本 处 便 以 这 样 的 属性 为 例 ， 如 图 2-20 所 示 。 


Та [на m] [ES [2 | зма m] 
性 


|DEMOCHAR 
长 文本 指 述 атн 
шеші 演示 特性 
版 本 D “| 激活 的 下 | 已 保存 
对 象 状 态 Æ жар, 可 执行 
一 般 的 / 业务 浏览 器 , O 主 数据 /文本 ( о 层次 结构 ACE TSS ses 
导航 属性 信息 提供 商 
属性 : 明细 /导航 属性 
B. [Fa |а. m 
公司 代码 Оо [ 公司 代码 a 
OTCTSYSID A BW 系统 МАУ [v] 0 [ [v] Bw 系统 ad 
OTCTUSERNM A mn NAV [v] O ZIL [v BP 
QUNIT A 计 里 的 单位 DIS По | 
OCURRENCY AB 货币 名 称 代码 DIS [v] 0 
LIO 
[] 0 
[] о 
Oo | 
= 
«||» [p Á——À M aa 7 EB 


图 2-20 信息 对 象 的 “属性 ”标签 页 


如 果 把 属性 定义 为 显示 属性 ,那么 在 与 特性 组 合 时 ， 仅 可 以 把 这 些 属 性 用 作 报 表 中 的 附 
加 信息 。 换 名 话说， 也 就 是 在 报表 中 ,不 可 以 使 用 这 些 属 性 在 选择 出 来 的 数据 集中 进行 
导航 。 
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如 果 把 属性 定义 为 导航 属性 ， 那 么 可 以 使 用 它们 在 查询 中 进行 导航 。 在 执行 查询 时 ， 
于 信息 提供 者 来 说 ， 系 统 不 区 分 导航 属性 和 特性 。 换 句 话 说 ， 导 航 属 性 就 如 同 存在 于 信息 所 
供 者 维度 中 的 特性 一 样 ， 也 可 以 具备 查询 中 的 所 有 导航 功能 ， 只 是 速度 相对 慢 一 些 ， 原因 将 
在 后 续 章 节 中 讲 到 。 

根据 实际 的 业务 需要 ， 如 果 相 关 属 性 要 求 具备 有 效 时 期 ， 则 可 以 把 显示 属性 和 导航 属性 
设置 为 与 时 间 相 关 。 这 一 功能 的 作用 非常 大 ， 使 用 它 可 以 按照 主 数据 在 任意 时 间 点 存在 的 方 
式 来 执行 报表 。 例 如 ， 可 以 通过 查询 找到 2006 年 华东 Ipad 销售 额 的 客户 明细 报表 ， 即 使 现 
在 某 些 客户 已 经 不 在 华东 居住 ! 

在 本 例 中 , 将 OUNIT 定义 为 “时 间 无 关 的 显示 属性 ”、 将 0CURRENCY 定义 为 “事件 相关 
的 显示 属性 ”、 将 GOGSDM 定义 为 “时 间 无 关 的 导航 属性 ” 将 OTCTSYSID 和 OTCTUSERNM 
定义 为 时 间 相关 的 导航 属 性 ， 此 时 分 别 查看 特性 DEMOCHAR 生成 的 各 张 透明 表 。 

E “P” KRP, KAP] GOGSDM 和 0UNIT， 说 明 “P” 表 存储 的 是 所 有 与 时 间 无 关 的 属 
性 ， 如 图 2-21 所 示 。 


ЕЕ [/BIC/PDEMOCHAR | 
短文 本 | 主 数据 (时 间 非 相关 ): 特性 演示 特性 | 
Attributes , Delvery and Maintenance Ф588, Entry hep/check Currency/Quantity Fields 
(^ 7 /BIC/OIDENOCHAR CHAR 0 
[v 7| RSOBIVERS CHAR 1 0 对 象 版 本 
国 м RSRCHANGEFLAG CHAR 1 ORRIRA CIBHA/D СЮ) 
O| Fl fBIC/OIGOGSDM CHAR 8 0 公司 代码 
(^| fBIO/OIUNIT UNIT 3 0 计量 的 单位 


图 2-21 信息 对 象 的 “P” 表 


在 “Q” 表 中 ,将 看 到 0TCTSYSID、0TCTUSERNM ЯП ОСОККЕМСҮ, 说 明 “Q” 表 存储 
的 是 所 有 与 时 间 相 关 的 属性 ， 如 图 2-22 所 示 。 


FEE [/BIC/QDEMOCHAR ”| 激活 
短文 本 | 主 数 据 (时 间 非 相关 ): 特性 演示 特性 | 


E | 

i^ fBIC/OIDEMOCHAR CHAR [ 
OBTVERS “ІМ RSOBIVERS CHAR 1 0 对 象 版 本 | 
DATETO “|М RSDATETO DATS 8 0 有 效 截止 日 期 
DATEFROM 1 M RSDATEFRON DATS 8 0 有 效 起 始 日 期 
CHANGED |^ RSRCHANGEFLAG CHAR 1 0 更 改 标识 (I 已 插入 / D CH) 
TCTSYSID O| M /BIO/OITCTSYSID CHAR 10 0 BW 系统 
TCTUSERNM 习 /BIO/OITCTUSERNM CHAR 12 она 
CURRENCY 7 ZBIO/OICURRENCY CUKY 5 0 货币 名 称 代码 


62-2 RANAH “Q” K 
在 “X” 表 中 ， 将 看 到 GoGSDM 的 索引 ， 即 S_GOGSDM ， 说 明 “X” 表 存储 的 是 所 有 与 
时 间 无 关 的 导航 属性 ， 如 图 2-23 所 示 。 
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转帐 表 /BIC/XDEMOCHAR ”| 激活 
短文 本 属性 SID 表 : 信息 对 象 演示 特性 


= М UT ID 
М RSOB[VERS CHAR il 0 对 象 版 本 | 
O| М fBIC/OIDEMOCHAR CHAR 10 0 演示 特性 

CHANGED | [| М RSRCHANGEFLAG CHAR 1 0 更 改 标识 ( 了 已 插入 / D БІН) 

3 GOGSDNM Bit RSSID INT4 10 0 主 数据 10 


图 2-23 信息 对 象 的 “X” 表 
在 “Y” 表 中 ， 将 看 到 OTCTSYSID 和 OTCTUSERNM 的 索引 ， 即 S OTCTSYSID #0 S_ 
OTCTUSERNM, ， 说 明 “Y” 表 存储 的 是 所 有 与 时 间 相 关 的 导航 属性 ， 如 图 2-24 所 示 。 


转帐 表 /BIC/TDEMOCHAR ”| 激活 
短文 本 属性 SID 表 (时 间 相 关 ): 信息 对 象 演示 特性 


М! 
= 
(7 RSDATETO DAS | в 0 有 效 截止 日 其 
(^ RSDATEFROM DATS а онн 
加 fBIC/OIDENOCHAR CHAR 10 _ 0 演示 特性 
(^ RSRCHANGEFLAG CHAR 1 овая (тел Го БИ) 
! M RSSID 1874 10 OED 
& OTCTUSERNI (7 RSSID INT4 10 (52220) 


图 2-24 信息 对 象 的 “Y” 表 
而 在 主 数据 表 的 “M” 视图 中 可 以 看 到 ,“P” 表 和 “Q” 表 中 的 所 有 属性 都 被 包含 在 
内 ， 无 论 是 否 与 时 间 相 关 ， 如 图 2-25 所 示 。 


数据 库 视图 /BIC/MDEMOCHAR “| 激活 
短文 本 主 数 据 表 的 视图 : 特性 演示 特性 


本 | |O CHAR | 0; 
BJVERS JBIC/GDENOCHAR — OBIVERS | 回 RSOBIVERS [pR | 1 
ATETO /BIC/QDEMOCHAR РАТЕТО [7 RSDATETO [O bars | 8 
ATEFRON /BIC/QDENOCHAR DATEFRON [7 RSDATEFROII [O Dars | 8 
HANGED | /ВІС/ОРЕМОСНАЕ CHANGED | Г] RSRCHANGEFLAG | CHAR i= 1) 
/BIC/COGSDY | /BIC/PDENOCHAR (/BIC/GOGSDM Г /BIC/OIGOGSDM — Г CHAR 8 
TCTSYSID [BIC/QDENOCHAR ТСТЗҮЗІр (ГІ /BIO/OITCTSYSID |^ CHAR | 10 
ICTUSERNM — — /BIC/ODENOCHAR TCTUSERNM — (^ /EIO/OITCTUSERME Г CHAR L 12 
NIT /BIC/PDENOCHAR UNIT ОГ /BIO/OIUNIT (OT | з 
URRENCY /BIC/ODEMOCHAR ^ CURRENCY [^ fBIO/OICURRENCY Г CUKY | 5: 


图 2-25 信息 对 象 的 “M” 视 图 
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通过 上 述 详细 分 析 ， 可 以 得 到 信息 对 象 的 数据 结构 地 图 ， 如 图 2-26 所 示 。 


加 载 数据 后 对 特性 АВ 可 能 的 更 改 


82-26 信息 对 象 的 数据 结构 地 图 


5. 层次 结构 

在 查询 分 析 过 程 中 使 用 层次 结构 来 展现 数据 的 备 选 视图 ， 信 息 对 象 的 “层次 结构 ” 标 
签 页 如 图 2-27 所 示 。 与 其 他 SAP 产品 ("d ECC) 一 样 ， 层 次 结构 发 挥 着 分 组 功能 的 作用 。 
层次 结构 包含 若干 节点 和 叶 节 点 ， 从 而 构成 了 一 种 父 项 与 子 项 的 关系 。 节 点 代表 实际 要 求 的 
任何 分 组 ， 如 “西部 地 区 ”。 叶 节点 以 特性 值 来 表示 ， 如 “一 名 销售 员 ”。 在 “层次 结构 ” 
标签 页 中 ， 可 以 确定 特性 是 否 可 以 拥有 层次 结构 ， 如 果 选 择 可 以 ， 则 还 需 确定 这 些 层次 结构 
具备 怎样 的 属性 。 如 果 勾 选 并 设置 了 “ 带 有 层次 结构 ” 复 选 框 ， 则 可 以 为 这 一 特性 手动 创 
建 层次 结构 (事务 码 ВНІ), ， 或 从 SAP ЕВР 等 源 系 统 中 提取 层次 结构 到 BW 系统 中 。 


名 | 网 版 本 比较 ШЕ ІШЕТІНІН) 


特性 DEMOCHAR 
长 文本 描述 ”| 演示 特性 
简要 描述 演示 特性 
版 本 D 激活 的 Ir 
对 象 杖 态 活动 ; 可 执行 
一 般 的 , 业务 浏览 器 . О 主 数据 /文本 口 属性 组 合 
连带 有 层次 结构 2 维护 层次 结构 
层次 结构 属性 Ebo 
口 层次 等 级 ， 与 版 本 相关 的 层次 结构 表 /BIC/HDEMOCHAR | 
@ 与 时 间 无 关 的 层次 结构 层次 结构 SID 表格 /BIC/KDEMOCHAR | 
口 整 个 层次 结构 是 时 间 相关 SID 层次 结构 ZBIC/IDEMOCHAR | 
O 层次 结构 时 间 相 关 
[ 使 用 临时 层次 结构 连接 层次 结构 间隔 表格 
口 层次 结构 中 允许 的 间隔 
口 冲销 节点 的 +/- 号 
Æ 层次 结构 的 外 部 特征 | 


2-27 信息 对 象 的 “层次 结构 ”标签 页 
特性 层次 结构 可 以 存在 许多 不 同 的 版 本 ,也 可 以 根据 实际 需要 ， 选 择 层 次 结构 是 否 随 着 
时 间 维 度 发 生变 化 。 
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(1) 版 本 相关 的 层次 结构 

特性 层次 结构 可 以 在 不 同 的 层次 结构 版 本 中 使 用 ， 可 以 在 BW 中 对 源 系 统 中 存在 的 不 同 
层次 结构 版 本 进行 建 模 ， 同 时 也 可 以 为 来 自 源 系统 的 同一 个 层次 结构 创建 不 同 的 版 本 。 随 后 
可 以 在 查询 中 对 这 些 版 本 进行 比较 。 

示例 : 为 “区 域 ”特性 构建 多 个 销售 区 域 层 次 结构 ， 创 建 若 干 层次 结构 版 本 ， 如 图 2-28 
所 示 ， 在 查询 中 对 它们 进行 比较 。 


图 2-28 版 本 相关 的 层次 结构 


(2) 整个 层次 结构 是 时 间 相关 

在 特性 的 “层次 结构 ”标签 页 中 ， 可 以 定义 整个 层次 结构 与 时 间 相 关 。 换 名 话说 ， 这 
一 层次 结构 存在 不 同 的 版 本 ， 它 们 仅 对 特定 的 时 间 间 隔 有 效 。 在 查询 中 ， 系 统 自动 根据 关键 
日 期 设置 并 选择 有 效 的 版 本 。 

示例 : 为 “区 域 ”特性 构建 销售 区 域 层次 结构 ， 把 层次 结构 设置 为 “整个 层次 结构 是 
时 间 相 关 ”。 这 样 ， 在 查询 中 就 可 以 在 不 同 的 时 间 点 对 同样 的 数据 进行 比较 (使 用 关键 日 期 
字段 ) ШИ 2-29 所 示 。 

E 


区 域 (北方 ) 


| 
| 区 域 (南方 ) 
EE 


图 2-29 ”整个 层次 结构 是 时 间 相 关 


(3) 层次 结构 时 间 相 关 

在 特性 的 “层次 结构 ”标签 页 中 ， 可 以 定义 层次 结构 是 与 时 间 相 关 的 。 随 后 在 查询 中 
系统 会 自动 根据 当前 关键 日 期 或 查询 中 指定 的 关键 日 期 ， 选 定 层次 结构 并 进行 展示 。 

示例 : 在 重新 构建 销售 区 域 的 组 织 机 构 时 发 现 ， 在 不 同时 间 把 一 名 员工 分 配 到 了 不 同 的 
成 本 中 心 ， 如 图 2-30 所 示 。 

(4) 层次 结构 中 允许 间隔 

在 特性 的 “层次 结构 ”标签 页 中 ,可 以 定义 层次 结构 为 “层次 结构 中 允许 间隔 ”。 例 
如 ， 无 需 在 成 本 中 心 层 次 结构 为 每 个 类 别 单独 定位 每 个 成 本 中 心 的 值 ， 取 而 代 之 ， 可 以 把 成 
本 中 心 的 值 指定 为 位 于 1000 ~ 1999 之 间 (创建 的 间隔 也 可 以 是 当前 不 存在 主 数据 的 特性 
ІН). 。 通 过 设 定 人 允许 间 隔 ， 可 以 把 业务 人 员 从 必须 重新 扩展 维护 层次 结构 中 解放 出 来 〈 因 为 
系统 会 自动 分 配 新 的 特性 值 ) 。 


了 3 


1900.01.01-2010.12.31 2011.01.01-9999.12.31 
Kj 2-30 层次 结构 时 间 相关 

以 上 详细 说 明了 层次 结构 的 使 用 方法 和 特点 ， 但 是 如 果 需 要 使 用 特性 层次 结构 ， 则 必须 
同时 满足 以 下 前 提 : 

1) 对 于 参考 其 他 特性 的 特性 〈 即 参考 特性 ) ， 不 可 以 为 其 创建 层次 结构 。 

2) 一 个 特性 可 以 具有 多 个 层次 结构 。 

3) 如 果 特 性 将 具有 层次 结构 ， 则 组 合 的 (特性 值 的 ) 最 大 长 度 限制 在 32 (而 不 是 60) 
个 字符 以 内 。 

4) 层次 结构 节点 +、/、- 符 号 的 变换 可 以 用 来 影响 查询 中 节点 的 显示 行为 ， 对 于 每 个 层 
次 结构 节点 ， 可 以 指定 在 此 节点 上 过 账 的 交易 数据 ，+ 、/、- 符 号 是 否 要 在 查询 显示 中 变换 。 

5) 层次 结构 最 多 可 以 有 98 个 层级 。 

6. 组 合 

在 “组 合 ” 标 签 页 中 ， 可 以 确定 该 特性 是 否 要 与 其 他 特性 组 合 以 唯一 确定 一 个 业务 对 
象 值 。 大 多 数 情况 下 ， 我 们 并 不 需要 这 样 做 ,但 是 在 需要 组 合 时 忘记 组 合 就 意味 着 BW 系统 
将 获取 垃圾 数据 ! 

例如 ， 成 本 中 心 1001 表示 成 本 控制 范围 1000 的 销售 成 本 中 心 ， 而 同时 它 还 表示 成 本 控 
制 范围 2000 的 销售 成 本 中 心 。 在 这 种 情况 下 ， 需 要 定义 成 本 中 心 与 成 本 控制 范围 特性 的 组 
合 。 男 一 个 例子 是 库存 位 置 ， 在 SAP 物料 管理 中 ， 只 借助 于 物料 的 库存 位 置 是 无 法 找到 对 
应 物料 的 ， 还 需要 通过 与 工厂 组 合 来 进行 唯一 确定 ， 如 图 2-31 所 示 。 


ж: 


。 原 料 工厂 的 库存 地 点 A JR AKRI EHE 

。 成 品 工厂 的 库存 地 点 A 是 一 个 立体 仓库 
为 了 数据 加 载 和 报表 的 准确 性 ， 
必须 将 库存 地 点 和 工厂 组 合 在 一 起 ， 
以 建立 真正 感 兴趣 的 存储 位 置 


图 2-31 组 合 特性 示例 


此 外 ， 还 可 以 使 用 组 合 来 定义 对 象 间 的 相关 性 ， 这 样 就 简化 了 报表 中 的 导航 。 
2.5.4 信息 块 一 一 一 种 扩展 的 星 形 结构 


1. 高 度 规格 化 的 关系 数据 库 模 型 (Online Transaction Processor, OLTP) 
几乎 所 有 的 OLTP 系统 都 是 使 用 高 度 规格 化 的 关系 模型 设计 的 ， 尤 其 在 复杂 的 系统 中 更 
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是 如 此 ， 如 SAP ERP, [£L 2-32 显示 了 有 关 销 售 订单 的 一 个 非常 简单 的 示例 。 正 如 图 中 描绘 
的 那样 ， 规 格 化 是 一 个 把 重复 数据 从 一 个 表 中 移 到 辅助 连接 表 的 流程 ， 从 而 使 原始 表 变 得 更 
小 。 尺 寸 的 缩小 ， 加 上 只 保留 最 基本 的 索引 模式 , 便 有 助 于 创建 、 更 新 和 删除 记录 。 为 获得 
这 一 优势 而 付出 的 代价 就 是 分 析 类 型 查询 性 能 的 降低 。 


OLTP 优 点 
最 小 尺寸 和 限定 索引 ， 有 利于 


插入 、 更 新 和 删除 记录 


[mesan — 
= 


um] 


物料 编号 


规格 化 : 在 单独 的 表 中 输入 重复 的 信息 


示例 : 公司 向 许多 客户 销售 相同 的 部 件 ， 因 而 不 需要 在 每 个 订单 记录 中 存储 
部 件 颜色 


2-32 OLTP 系统 的 特点 概览 


2. 经 典 星 形 模型 一 EDW 数据 库 模 型 

为 了 创建 企业 数据 仓库 或 OLAP 应 用 程序 ， 换 句 话 说， 出 于 分 析 应 用 的 目的 ， 需 要 使 用 多 
维 数据 模型 。OLTP 规格 化 设计 的 问题 使 其 无 法 被 用 来 支持 复杂 的 特殊 数据 分 析 。 如 图 2-33 所 
示 ， 对 于 关系 数据 库 而 言 ， 经 典 星 形 模型 是 使 用 最 频繁 的 多 维 模型 。 这 个 数据 库 模型 归 类 出 
两 组 数据 ， 即 事实 (如 销售 金额 或 数量 ) 和 维度 属性 〈 如 客户 、 物 料 或 时 间 ) 。 事 实 有 时 也 
称 为 可 计量 的 值 ， 是 业务 流程 分 析 的 重点 。 事 实数 据 (数据 的 值 ) 存储 在 高 度 规格 化 的 数 
据 表 中 。 从 技术 角度 讲 ， 维 度 属性 的 值 存储 在 各 种 非 规格 化 的 维度 表 中 。 从 业务 角度 讲 ， 这 
些 表 总 体 称 为 业务 流程 维度 ， 简 称 维度 。 此 处 ， 逻 辑 相 关 的 维度 属性 作为 层次 结构 ( 父 项 
和 子 项 的 关系 ) 存储 在 维度 表 内 。 这 些 维度 表 借 助 于 键 值 关系 与 中 心 数据 表 关 联 式 地 连接 
在 一 起 。 在 显示 的 星 形 模型 设计 中 ， 维 度 表 的 键 值 是 机 器 生成 的 维度 键 (DIM ID)， 它 唯一 
定义 了 维度 属性 值 的 组 合 。 在 数据 表 中 ，DIM ID (连续 分 配 的 编号 ) 是 一 个 外 键 。 这 样 就 
可 以 唯一 识别 数据 表 中 的 所 有 数据 记录 ， 如 图 2-33 所 示 。 

在 图 2-34 中 ， 业 务 流程 变 成 了 与 上 图 的 销售 数据 相对 的 成 本 中 心 交 易 ， 并 且 添 加 了 一 
些 从 先前 有 关 特 性 的 课程 中 获取 的 详细 信息 。 这 样 就 生成 了 一 张 BW 星 形 模 型 的 功能 视图 。 
这 一 设计 的 好 处 在 于 ， 它 适用 于 该 业务 的 所 有 方面 。 

3. 维度 表 

在 维度 表 中 ， 无 论语 义 相关 的 维度 属性 有 多 少 ， 都 存储 在 一 个 层次 结构 ( 父 项 与 子 项 
的 关系 为 1xN) 中 。 在 图 2-35 中 ， 时 间 维 度 表 由 维度 属性 “会 计 年 度 ” 和 “会 计 期 间 ” 
构成 。 如 果 维 度 属性 之 间 存 在 М: N 的 关系 ， 则 它们 通常 存储 在 不 同 的 维度 表 中 。 
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销售 组 织 代码 是 系统 
维度 表 生成 的 序列 号 
Sales ORG 


Sales_Division 
Sales_Person 


数据 表 


交易 金额 
数量 


时 间 维度 表 


Time DIM ID 


这 些 表 中 的 字段 
称 为 维度 的 “属性 ” 


日 历年 
日 历 期 间 


产品 
维度 表 


Product DIM ID у^ 


某 些 不 太 复 杂 
的 星 形 模式 将 
主 数据 标识 

(如 物料 编号 ) 
用 作 DIM 标识 


图 2-33 经 典 的 星 形 模型 
成 本 中 心 成 本 要 素 
维度 表 维度 表 
Cost Center Id Cost Element & 
成 本 控制 范围 发 货 方 / 收 货 方 标识 АР 


负责 人 


在 BI rh, DIM 字段 为 特 
性 或 时 间 特 性 InfoObject 


时 间 维 度 表 


计 年 度 
计 期 间 


(Cost Center DIM ID y* 
ost Element DIM ID 


14 


Time DIM ID 


TE BI 中 ， 数 据 为 
关键 值 InfoOject 


图 2-34 经 典 的 星 形 模型 结构 举例 
与 销售 信息 块 有 关 的 男 一 示例 是 产品 维度 ， 它 包含 单个 产品 。 在 大 多 数 公司 中 ， 产 品 分 


为 产品 线 和 次 产品 线 或 类 别 。 例 如 ， 产 品 X 是 巧克力 块 ， 它 是 食品 类 别 中 糖果 产品 线 的 组 


在 经 典 星 形 模型 中 ， 维 度 
可 用 作 补 充 信 息 源 。 描 述 属 性 与 维度 属性 之 间 总 是 1 
是 物料 维度 表 中 维度 属性 “物料 ”的 描述 属性 。 

维度 属性 /描述 属性 包含 任意 数量 的 值 。 例 如 ， 


这 只 是 一 个 简单 的 示例 ， 重 点 是 ， 领 域 类 别 、 产 品 线 和 其 他 项 应 该 位 于 维度 表 中 。 
属性 可 以 拥有 任意 数量 的 描述 


属性 ， 也 称 作 非 维度 属性 ， 它 们 
:1 的 关系 。 在 图 2-33 中 ,“ 物 料 名 称 ” 


E 
HE 


“硬件 ”和 “软件 ”会 分 配 到 维度 


“物料 组 ”， 值 “监控 带 ” 和 “键盘 ”会 分 配 到 描述 


属性 “物料 名 称 ”。 


Mal x EVE, 经典 星 形 模型 中 的 维度 表 通 常 称 为 维度 。 维 度 定义 了 用 户 (决策 者 ) 可 


能 的 数据 查看 视角 。 


每 个 经 典 星 形 模型 包含 一 个 或 多 个 维度 表 。 每 个 维度 表 包 含 一 个 主键 ， 称 为 维度 键 。 在 
上 述 示例 中 ， 它 是 一 个 机 器 生成 的 序列 号 。 在 其 他 更 基本 的 设计 中 ， 这 个 键 由 具有 最 高 细节 
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成 本 中 心 维度 表 


2 负责 人 


FD m 


12 | 1900000004275 ШОТТ РАМА 


2 | то00000004277 | 1000 DIETER 


成 本 要 素 维度 表 


成 本 要 素 

FSU” m 
Dem em — [s — — 
осоо эзи 


时 间 维 度 表 


003.1999 1999 


004.1999 LM 


2-35 经 典 的 星 形 模型 的 维度 表 


层级 的 维度 属性 决定 。 如 果 我 们 展示 的 是 一 个 更 基本 的 销售 星 形 模型 ， 那 么 产品 标识 就 会 是 
品 维度 的 键 值 。 这 些 维度 表 借 助 于 键 关系 与 中 心 数据 表 连 接 在 一 起 。 这 些 维度 表 完 全 是 非 
规格 化 的 ， 换 句 话 说， 与 OLTP 示例 一 样 ， 重 复 的 信息 未 分 解 到 不 同 的 表 中 。 
4. 数据 表 和 完整 的 星 形 模型 
数据 表 在 星 形 模型 中 发 挥 中 心 表 的 作用 。 计 量 值 或 数据 (BW 术语 称 其 为 关键 值 ) 通过 
数据 表 集 合 在 一 起 。 
1) 每 个 经 典 星 形 模型 恰好 由 一 个 数据 表 构成 。 
2) 数据 表 中 包含 事实 数据 ， 包 括 带 有 事实 数据 (50000, 3000, 100000 等 ) 的 销售 数 
据 和 带 有 事实 数据 (100, 60, 250 等 ) 的 数量 。 
3) 中 心 数 据 表 通 过 唯一 键 与 周围 的 维度 表 相 连 。 所 有 维度 键 ( 外 键 ) 一 起 构成 了 数据 
表 的 主键 。 在 图 2-36 中 ， 数 据 表 的 主键 由 维度 键 COST. CENTER, DIM, ID, COST ELEMENT 
_DIM_ID 和 TIME_DIM_ID 构成 ， 其 结果 是 可 以 唯一 识别 数据 表 中 的 所 有 数据 记录 (因此 也 
一 识别 所 有 的 事实 数据 ) 。 例 如 ， 事 实数 据 (50 000/100) 可 以 通过 维度 键 的 值 的 组 合 
(1,1,1) 唯一 识别 。 
4) 该 数据 表 是 高 度 规格 化 的 。 
图 2-36 显示 了 维度 表 和 数据 表 在 星 形 框 架 中 是 如 何 布置 的 ， 还 展示 了 非 规 格 化 维度 表 
与 高 度 规格 化 数据 表 之 间 的 连接 。 
在 经 典 星 形 模型 中 ， 存 储 数据 会 使 其 得 到 优化 ， 以 用 于 报表 。 它 允许 用 户 从 各 种 角度 
(维度 ) 查看 数据 。 用 户 可 能 有 兴趣 找到 以 下 问题 的 答案 
1) 产生 的 大 部 分 差 旅 住宿 费用 由 谁 负 责 支付 ? 
2) 哪个 成 本 要 素 ( 差 旅 、 工 资 支出 或 折旧 ) 是 我 们 的 最 大 支出 ? 
3) 所 有 成 本 中 心 加 起 来 的 总 费用 是 多 少 ? 
4) 这 些 成 本 是 什么 时 候 产 生 的 ? 
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成 本 中 心 维度 表 


CostCenter ç 
DIM ID 成 本 


EEF 


心 DIM ID 


时 间 维 度 表 


时 间 DIM ID 


会 计 


мы CO 
1900000004275 | 1000 | DANA 
Т900000004277 | 1000 | DIETER 


成 本 要 素 DIM ID 


003.1999 1999 


А 


2-36 


5. BW 模型 一 一 一 种 扩展 的 星 形 模 型 


经 典 的 星 形 模型 数据 关系 举例 


尽管 图 2-36 所 示 的 是 星 形 模型 的 功能 定义 ,但 从 BW 系统 的 角度 讲 ， 它 是 不 完整 的 。 


在 构建 大 部 分 EDW 时 所 基于 的 完整 BW 模型 是 一 个 大 大 增强 ( 完善， 的 星 形 模型 。 这 
进 消除 了 经 典 星 形 模型 经 历 过 的 技术 和 业务 报表 问题 。 
要 回顾 一 下 特性 对 象 ， 其 中 需要 重点 关注 具有 主 数据 的 特性 。 图 2-37 | 


主 数 
性 成 本 中 心 编号 的 主 数据 表 
成 本 中 心 编号 
СО Агеа 


公司 代码 
Profit Ctr 


jede /SID 3e 


b 


在 深入 探讨 BW 信息 块 模型 之 前 ， 


Ed 


Ph 心 层 次 结构 


成 本 中 心 编号 


短文 本 
长 文本 


SID_Cost_Center 


Р 2-37 扩 


成 本 要 素 
成 本 要 素 组 


成 本 中 心 


成 本 要 素 


SID_Cost Element 


展 的 星 形 模型 


ЖАНД: 在 激活 信息 对 象 时 ， 会 产生 一 个 “S” 表 ， 该 表 用 于 存储 系统 生成 的 SID 编号 和 特性 值 的 对 照 关 系 。 
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改 


== 
Tiu 


示 了 BW 交付 的 众 


多 具有 主 数据 的 特性 中 的 两 个 。 尽 管 特性 对 象 在 维度 表 中 是 属性 字段 ， 但 是 在 整体 模型 设计 
中 ,使 自己 的 主 数据 表 与 自身 相连 的 特性 是 十 分 重要 的 。 

图 2-38 使 用 成 本 中 心 交 易 作 为 示例 ， 展 示 了 经 典 星 形 模型 与 BW 星 形 模型 之 间 的 交叉 
关系 。 特 别 注 意 ， 信 息 块 的 维度 中 所 使 用 的 具有 主 数 据 的 特性 是 如 何 与 它 的 主 数据 相连 
接 的 。 


外 部 层次 结构 
属性 表 
成 本 要 素 组 
成 本 要 素 DIM ID COST ELEMENT| |COST ELEMENT 
| SID COST ELEMENT 
数据 表 SID SENDER. REC 


DIM ID COST ELEMENT 
DIM ID TIME 
DIM ID COST CENTER 


外 部 层次 结构 


文本 表 
短文 本 
特定 成 本 要 素 


SID COST CENTER 
SID CO AREA* 
SID PERS RESP* 


COST ЕМТЕК# 
pa 


E] 


时 间 维 度 


负责 人 InfoObject 既 在 主 时 间 维 度 表 
数据 中 ， 又 在 DIM 


Е 中 
EDME DIM ID TIME 
SID FISCAL PERIOD 
SID FISCAL YEAR 


SID X 


SID FISC YEAR 


图 2-38 扩展 的 星 形 模型 举例 


在 图 2-39 中 可 以 看 到 ，BW 星 形 模型 是 如 何在 经 典 星 形 模型 的 基础 上 增强 的 。 该 增强 
表现 在 维度 表 不 包含 主 数据 信息 ， 主 数据 信息 存储 在 单独 的 表 中 ， 这 些 表 称 为 主 数据 表 。 主 
数据 表 “ 扩 展 了 ” 星 形 模 型 ， 从 而 产生 出 一 种 扩展 的 星 形 模 型 。 

6. BW 信息 块 (InfoCube) 

信息 块 是 BW 中 多 维 模型 的 核心 对 象 ， 大 多 数 BEx 报表 和 分 析 都 直接 或 间接 地 基于 这 
些 对 象 ， 大 多 数 的 数据 也 都 存储 在 信息 块 中 。 从 报表 角度 讲 ， 信 息 块 描述 了 业务 范围 内 的 独 
立 数据 集 ， 可 以 为 其 定义 查询 。 

信息 块 中 包含 多 维度 布置 的 大 量 关 系 表 ， 也 就 是 说 ， 它 包含 一 个 中 心 数据 表 ， 该 表 周 于 
又 有 多 个 维度 表 ， 而 同时 ， 维 度 表 中 的 SID 编号 又 把 这 些 维度 表 连 接 到 与 它们 对 应 特征 的 各 
个 主 数据 表 (P. Q. X. Y 和 T 表 ) 。 

Ё 2-40 显示 了 更 多 维度 和 更 多 主 数据 。 正 如 在 前 面部 分 所 讨论 的 那样 ， 事实 表 中 的 事 
实 称 为 关键 值 ， 维 度 属 性 则 称 为 特性 。 这 些 维度 表 借 助 于 键 值 与 中 心 数据 表 连 接 在 一 起 。 与 
经 典 星 形 模型 不 同 ， 特 性 不 是 维度 表 的 组 成 部 分 ， 换 句 话 说， 这 些 特性 值 不 存储 在 维度 表 
中 。 系 统 为 每 个 特性 都 生成 了 一 个 数字 的 SID 键 。 这 个 “别名 ” 键 奉 代 了 作为 维度 表 组 成 
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连接 主 数据 表 到 InfoCube 


SID # 
属性 


2-39 主 数据 和 信息 块 的 连接 关系 示意 网 


СО Агеа 


Company Code 特定 成 本 要 素 


成 本 中 心 维度 表 


COST_CTR# OST_CTR_DIM 


SID COST СТК HSID_COST_CENTERIIIIDIM ID TIME 
SID CO AREA* [ID E 
SID_PERS_RESP* 

金额 


COST_CENTER# 


数据 包 维 度 时 间 维 度 
时 间 维 度 表 单位 维度 表 


7 4 
数据 包 维 度 表 DIM ID TIME DIM ID UNIT 
МОНА ТАРАН SID FISCAL PERIOD SID UNIT 

SID REQUEST SID FISCAL YEAR SID CURRENCY 


SID 表 
REQUEST. ID 
SID REQUEST SID FISC YEAR SID FISC PER SID CURRENCY 


2-40 主 数据 和 维度 表 以 及 
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部 分 的 特性 。 此 处 ，SID 代表 主 数据 标识 或 代理 标识 (替代 键 )。 在 具有 主 数据 的 特性 图 中 ， 
这 些 键 都 加 上 了 前 级“SID_”。 例 如 ，SID_Cost_Center 是 成 本 中 心 这 一 特性 的 SID 键 。 维 度 
表 包 含 一 个 生成 的 数字 主键 ， 称 为 维度 键 。 维 度 表 由 前 缀 DIM_ID_ 表 示 ， 此 处 ，DIM_ID_ 
CostCenter 是 成 本 中 心 这 一 维度 的 维度 键 。 与 经 典 星 形 模 型 一 样 ， 数 据 表 的 主键 由 多 个 维度 
键 组 成 。 

言 息 块 中 维度 表 的 总 个 数 最 多 为 16 个 ， 其 中 3 个 由 ЗАР 提供 ， 即 技术 维度 (DIM_ID_ 
DATAPAKET) 、 时 间 维 度 (DIM ID TIME) 和 单位 维度 ('DIM_ID_UNITS) ， 因 此 用 户 可 以 
为 一 个 信息 块 定义 多 达 13 个 维度 表 ， 并 且 必 须 至 少 定 义 一 个 。 由 于 需要 用 交易 的 时 间 来 增 
加 意义 ， 因 此 时 间 维 度 是 必要 的 。 单 位 维度 存储 计量 单位 或 关键 值 的 货币 ， 因 此 也 是 一 条 关 
键 信息 。 数 据 包 维度 是 一 个 技术 装载 标识 符 ， 存 储 请 求 号 以 及 数据 包 号 等 技术 信息 。 

使 用 主 数据 的 一 个 特殊 好 处 是 能 够 在 不 同 的 信息 块 间 分 享 和 使 用 共同 的 主 数据 。 达 到 此 
目的 的 方法 是 ， 通 过 使 用 SID 技术 创建 链接 ， 把 主 数据 从 维度 表 中 移 除 ， 其 结果 是 ， 不 同 的 
言 息 块 可 以 共享 全 BW 系统 唯一 的 主 数据 ， 换 名 话说 就 是 ， 主 数据 独立 于 信息 块 存 在 ， 而 且 
可 以 同时 由 多 个 查询 在 独立 于 多 个 不 同 信息 块 的 情况 下 使 用 。 图 2-41 所 示 阐 述 了 这 一 
概念 。 


独立 于 InfoCube 使 用 主 数据 


图 2-41 信息 块 之 间 的 主 数据 共享 


7. 经 典 星 形 模型 与 BW 星 形 模型 的 对 比 
首先 比较 两 种 模型 的 术语 ， 具 体 见 表 2-1。 


表 2-1 两 种 星 形 模型 的 术语 比较 


经 典 星 形 模型 术语 BW 星 形 模型 术语 
数据 关键 指标 
维度 属性 特性 
描述 的 属性 属性 文本 
— 外 部 层次 结构 
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经 典 星 形 模型 术语 BW 星 形 模 型 术语 
维度 表 (包含 主 数据 ) 维度 表 (不 包含 主 数据 ) 
维度 = 
维度 = 维度 表 (可 选 ) 
维度 表 SID 表 
主 数据 表 (可 选 ) 


(1) 经 典 星 形 模型 的 优势 和 劣势 

1) RA: 由 于 只 有 少量 的 联合 操作 〈 只 有 数据 表 和 相关 维度 表 之 间 的 联合 操作 ) HJ 
此 能 相当 好 地 执行 数据 访问 。 

2) 劣势 : 

e 维度 表 中 存在 元 余 的 条 目 。 

e 与 事实 数据 (通过 时 间 维 度 表 提供 时 间 参 考 ) 的 历史 记录 (如 何 对 时 间 建 模 ) 不 同 ， 

维度 〈 缓 慢 更 改 的 维度 ) 的 历史 记录 不 易于 建 模 。 

e 繁琐 的 多 语言 能 力 ， 即 在 多 语言 环境 下 需要 对 所 有 语言 在 维度 表 中 了 予以 存储 。 

e 对 维度 中 的 一 些 层次 结构 类 型 (如 不 平衡 的 并 行 层 次 结构 ) 进行 建 模 可 能 导致 异常 。 

e 由 于 集合 和 基本 事实 数据 存储 在 相同 表 (数据 表 ) 中 ， 因 此 降低 了 查询 性 能 。 

(2) BW 星 形 模型 的 优势 

1) 得 益 于 SID 以 及 从 维度 表 到 主 数据 的 连接 ， 使 下 列 建 模 成 为 可 能 : 

e 对 缓慢 移动 的 维度 (时间 相 关 的 主 数据 ) 轻松 建 模 。 

e 多 语言 能 力 。 

e 跨 信息 块 使 用 主 数据 (共享 主 数据 ) 。 

e 有 能 力 处 理 特性 的 空 值 。 

2) 使 用 自动 生成 的 INT4 键 (SID EF DIM ID ££). 访问 数据 ， 比 通过 长 长 的 字母 、 数 
字 键 (所 有 的 大 数据 量 表 都 是 100% 编号 ) 来 访问 数据 ， 速 度 更 快 。 
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%33% SAP BW 功能 增强 概览 


3.1 АВАР/4 语言 简介 


АВАР (Advanced Business Application Programming, АВАР) 是 一 种 高 级 企业 应 用 编程 语 
言 ， 起 源 于 20 世纪 80 年 代 ， 经 过 不 断 的 发 展 ， 现 在 的 版 本 为 ABAP/4, SAP 大 部 分 产品 的 
应 用 程序 就 是 用 АВАР/4 编写 的 。 

ABAP 产生 的 最 初 目的 是 用 以 生成 简单 打印 报表 程序 。 我 们 知道 ，SAP ERP 最 初 是 为 解 
决 财务 实时 数据 处 理 的 ，ABAP 用 于 编写 SAP 的 大 部 分 产品 源 代码 。 严 格 地 讲 ，ABAP 不 仅 
是 一 个 开发 工具 ， 而 且 是 一 套 完整 的 Client/Server 开发 环境 。 

SAP 开发 环境 基于 服务 器 的 三 层 架构 ， 如 在 安装 SAP 时 也 可 将 数据 库 安装 在 一 台 服 务 
器 硬件 上 ， 而 应 用 服务 右 安 装 在 男 外 一 台 服务 器 硬件 上 ， 而 通常 客户 端 安 装 的 ЗАР Front 
End 和 SAP 前 端 会 话 管理 器 等 是 所 谓 的 表示 层 ， 它 通过 TCP/IP 和 应 用 服务 器 进行 数据 传 
输 ， 用 户 看 到 的 只 是 处 理 后 的 数据 返回 。 

综合 起 来 看 ，ABAP 语言 有 以 下 几 个 特征 : 

1) АВАР 支持 多 种 语言 。 

2) АВАР 是 面向 对 象 语言 ， 文 持 封装 性 和 继承 性 。 

3) ABAP 具有 事件 驱动 的 特性 。 

4) ABAP 适合 生成 报表 。 

5) ABAP 支持 对 数据 库 的 操作 。 

6) ABAP 支持 商业 数据 类 型 和 操作 。 

7) ABAP 提供 一 系列 功能 处 理 字符 串 。 

8) АВАР 包含 一 个 叫 OpenSQL 的 SQL FÆ, 

9) АВАР 允许 用 户 自 定义 和 处 理 内 部 表 。 

10) ABAP 允许 用 户 定义 和 调用 子 程序 。 

需要 说 明 的 是 ， 由 于 整个 ЗАР 系统 是 跨 数 据 库 平台 的 ， 因 此 用 户 只 需要 知道 如 何 使 用 
Open SQL 即 可 ， 而 不 必 关 心底 层 数据 库 的 类 型 是 SQL Server， 还 是 Oracle, 或 是 SAP HANA, 

用 户 接 触 最 多 的 几 类 АВАР 程序 分 别 是 报表 程序 、 对 话 程 序 、 功 能 模块 和 面向 对 象 的 
Class 程序 。 其 中 ， 功 能 模块 和 面向 对 象 的 Class 程序 是 模块 化 技术 在 АВАР 语言 中 的 具体 
体现 。 


3.1.1 报表 程序 


报表 程序 主要 用 于 展示 数据 库 表 中 的 数据 以 及 对 结果 进行 打印 ， 虽 然 其 本 身 能 够 通过 
Open SQL (少数 情况 下 也 会 使 用 Native SQL). 的 方式 对 数据 库 表 中 的 数据 进行 增加 、 删 除 和 

修改 等 操作 。 
报表 程序 可 以 使 用 事务 代码 SE38 或 SE80 进行 维护 ， 用 户 自 定义 程序 的 报表 命名 通常 
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以 “Z” 或 “Y” 开 头 ， 主 维护 界面 如 图 3-1 所 示 ， 代 码 逻 辑 维护 界面 如 图 3-2 所 示 。 
(г 程序 (P) ”编辑 (E) WEG ”实用 程序 (M) Environment 系统 (Y) ”帮助 (H) ры“ 
e | „чв еае вив noon e 


АВАР ЯН. БӨЛЕ 
аз 1 Q p bk TUD Qu Фаш (ens 


程序 [zDEMO REPORT | m Өн 


ED Ë | SE38 ~ | WINECC6 | INS аў 


3-1 主 维护 界面 


[c 程序 (P) HE) HFG) ”实用 程序 (M) Environment 系统 (Y) ”帮助 (H) шы 
е -лнсеогевивіғтевва ФЕ 


АВАР Ж. ЖУ HRE ZDEMO REPORT | 
е-е?» 79% О з m s SU H GG 模式 程序 美化 器 


^ Us = 
ge |zDEMoO REPORT] 活动 


4 
Б *@ 
Т 


3 
8 REPORT zdemo report. 
( 


10 
11 
12 START-OF-SELECTION. 
13 

1 


4 WRITE:' HELLO, WORLD!" . 


ABAP {т 2 列 24 CAP 
ED Ë | 5Е38 * | WINECC6 | INS 


6 M 


图 3-2 КАНИЕТ 


3.1.2 ”对话 程 序 

对 话 程序 主要 用 于 用 户 和 系统 的 在 线 交 互 ， 如 多 级 数据 的 录入 等 。 标 准 的 ЗАР ERP 业 
务 操作 都 可 以 被 看 作 是 一 个 个 的 对 话 程序 。 对 话 程序 包含 对 话 模块 的 模块 池 。 每 个 动态 程序 
(由 一 个 屏幕 及 其 逻辑 流 组 成 的 “动态 程序 ") 都 基于 一 个 АВАР 对 话 程序 。 逻 辑 流 包含 对 
АВАР 对 话 模 块 的 调用 和 操作 。 
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对 话 程序 可 以 使 用 事务 代码 SE38 或 SESO 进行 代码 的 编写 和 屏幕 的 制作 ， 最 主要 的 就 
是 屏幕 的 分 布 以 及 逻辑 流 中 各 个 元 素 操作 代码 的 编写 ， 用 户 自 定义 程序 的 命名 通常 以 “Z2” 
或 “Y” 开 头 。 函 数 池 维 护 界面 如 图 3-3 所 示 ， 逻 辑 流 维护 界面 如 图 3-4 所 示 ， 元 素 清单 维 
护 界 面 如 图 3-5 所 示 ， 屏 幕 制 作 界面 如 图 3-6 所 示 。 


(г 程序 (P) ”编辑 (E) ” 转 到 (6G) ”实用 程序 (M) Environment ”系统 (Y) ”帮助 (H) REL 
€i  -jaH eee вив ааа әт 


АВАР ЗЕ. 显示 ЖЖЖ! SAPLRSAWBN МАІМ | 
e> #?% шщ @ nigh АВОН ФО ас | ал des сн 


函数 池 [SAPLRSAWBN MAIN | 活动 


ET 
2 | ж  $ystem-defined Include-files. * 
3 l eaae eade ee e e e e e Be e e Be e e Be Be e Be e e Be Be e e Be Ie I e КУ ee Be E Re e e e e e eee e 
4 INCLUDE LRSAWBN MAINTOP. * &lobal Data 

5 INCLUDE LRSAWBN MAINUXX. * Function Modules 

Ti El deae ek e ee e e BE E E E e BE I BE BE EE BE CE IE ERE CE BE CE E CIE EE BE E BE E RE E E E RE Be E E EE EE 
8 *  User-defined Include-files (if necessary). * 
WI ккк ккк кк К К К КЕК К КК КККК ККК К КККК 
10 ж INCLUDE LRSAWBN MAINF... * $ubprograms 

11 | ж INCLUDE LRSAWBN МАТА... * PBO-Modules 

12i “ж INCLUDE LRSAWBN MAINI... * PAI-Hodules 


14 INCLUDE LRSAWBN МАТМООІ. 
16; INCLUDE LRSAWBN МАІМІ01. 
18 INCLUDE LRSAWBN MAINFO!. 
20 «INCLUDE LRSAWBN МАТМЕ02. 


АВАР | 行 1 列 1 САР 
E D | RSA1 * | WINECC6 | INS d 
Kd 3-3 KZOE Л ЛЫШ 
(г 屏幕 (5) ”编辑 (E) ” 转 到 (6G) ”实用 程序 (M) Environment ”系统 (Y) ”帮助 (H) шы 


е “ча еге вив апаз @ m 
Жем. SAPLZDEDW_PZ_01 f ЕЖ ЖЖ | 
Фә Фй з Яо» SRI dus | 规范 化 打印 机 


屏幕 8 码 [9999| 激 活 
属性 | 


1 PROCESS BEFORE OUTPUT. 

2 MODULE LISTE INITIALISIEREN. 
3 E LOOP AT EXTRACT WITH CONTROL i S 
4 TCTRL ZDEDW PZ 01 CURSOR NEXTLINE. 

5 MODULE LISTE SHOW LISTE. 

6 ENDLOOP. 

Ti. ow 

8 PROCESS AFTER INPUT. 

9 MODULE LISTE EXIT COMMAND АТ EXIT-COMMAND. 

10 MODULE LISTE BEFORE LOOP. 

11; E LOOP AT EXTRACT. 


12 MODULE LISTE INIT VORKAREA. 
13 CHAIN. 
14 FIELD ZDEDW PZ O1-ZPZ, SOURCE . 
15. FIELD ZDEDW PZ O1-ZPZ DESTNAT . 
16! FIELD ZDEDW PZ D1-ZPZ ТҮР. 
17 FIELD ZDEDW PZ 01-ZPZ SEQUEN . 
18 FIELD ZDEDW PZ 01-ІРІ FUNCT . 
19 FIELD ZDEDW PZ O1-ZPZ DEBUG . 
20 FIELD ZDEDW PZ 01-ZPZ PARAI ` 
21 FIELD ZDEDW PZ 01-ZPZ PARA2 ` 
22 FIELD ZDEDW PZ 01-ІРІ PARA3 ` < 
951 FIELD ZDEDW PZ 01-ІРІ PARAd ` = 
Елі ETETn MEMI D7 ni 7D7 барақ 
ABAP Ж 15] 1 
E D | IDS (1) 800 * | WINECC6 | INS Е 


3-4 ”逻辑 流 维护 界面 
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ІР 屏幕 (5) ”编辑 (E) ” 转 到 (G) ”实用 程序 (M) Environment ”系统 (Y) ЖУН) LL 
ег X  -j4H eee вы nona по ов 


po | B 


屏幕 号 码 9999| 激活 

nies t Ит | 列 o. ət. z ЕЕ | 格式 Ж... 0... 18... [Property ist El 
CIRL ZDEDW PZ 01 1| 1188188 Ша и es 

- VIM FRAME FIELD . a| oj | 60 E Jm t >й 

- | *ZDEDW PZ 01-2Р2 500. na i| 1 40 10) 1 00.0 Му = 

-| *ZDEDW PZ O1-ZPZ DES. XÆ 1 2 40 10 1 10.0 Му 

- *ZDEDW PZ 01-222 ТҮР 文本 | 1 3 40 8 1 П/П Пп |“2 

-| *ZDEDW PZ 01-22 SEQ. ХЖ 1 4 40 4 1 )D D g 

-| *ZDEDW Pz O1-ZPZ FUN. XÆ | 1 5 40 30 1 Jo I 

- *ZDEDW PZ 01-222 DEB. ХЖ 1 6 40 4 1 JD D ие 

-| *ZDEDW PZ 01-ZPZ PAR. 文 本 1 7 40 10 1 olol O ИУ a 

-| *zDEDNW Pz O1-ZPZ PAR. 文本 | 1| 8| 40 10 1| ПП О Му ` 

I 4. 
ED D | SM30 * | WINECCO | INS “іш 
图 3-5 元 素 清 单 维 护 界面 
= 
RSO RSO ” 转 到 (G6) ”实用 程序 (V) Environment #8800) 


€ [(N|Cee|DH|zam|oo|muu|e 
а тае Н» | G mut ems eem | 


ае ОЕР Р2 0Т2Р2 e C ыо н ар а ШЕ ! 


[| нж | 转换 目标 | 
елы! 


n. 


оте а 


m] 
Н 


c 
11 


ама 


Е 


[活动 的 рав clx61L [INS [ps A 


- 
т. 上 
2 


DS 


3-6 屏幕 制作 界面 


3.1.3 功能 模块 


功能 模块 是 一 小 段 АВАР 代码 ， 用 以 实现 相对 独立 、 可 重用 的 系统 功能 。 功 能 模块 在 系 
统 的 中 央 库 进行 维护 ， 以 功能 模块 组 的 方式 进行 管理 ， 每 个 功能 模块 组 可 以 包含 最 多 99 个 
功能 模块 。 功 外 g 模 块 可 以 在 系统 中 的 任意 位 置 予 以 调用 ， 在 调用 程序 和 被 调用 功能 模块 之 间 
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有 一 个 明确 定义 的 数据 接口 ， 且 能 够 基于 调用 程序 进行 独立 的 代码 测试 。 
功能 模块 可 以 使 用 事务 代码 SE37 或 SE80 进行 维护 ， 用 户 自 定义 的 功能 模块 命名 通常 
以 “Z” 或 “Y” 开 头 ， 主 维护 界面 如 图 3-7 所 示 。 
区 ”函数 模块 (FE) ”编辑 (E) ” 转 到 (G) ”实用 程序 (M) Environment ”系统 (Y) ”帮助 (H) шори 
ет о-іанегепинміттеяғ @ m 


Өк. Фа | 
$8 ; Roo Hi 0 0 Ф 重新 分配 … 


Function Module (ТЕрн 25 orcr 0501 zTCT 001 | 


6 显示 2 修改 a 创建 


ED D | 5Е37 * | WINECC6 | INS + ig 


图 3-7 主 维护 界面 
相关 的 输入 、 输 出 以 及 操作 表 数 据 接口 等 维护 界面 如 图 3-8 ~ 图 3-13 所 示 。 


[E 函数 模块 (E) ”编辑 (E) 383006) ”实用 程序 (M) Environment RAY) 帮助 (H) ышы 
€ i ë ë -jaH eee вив атаа Qm 

BRZE: GS ZEDW JS OTCT DSO1 ZTCT 001 | 
(ESZO Ani ae AADA GG es ssec gums 


Function module [герт 25 orcr psoi zrcr 001 ”| 活动 = 

2 Rit Export | Changing | Æ | Exceptions | Source code | 

ИШЕ ДЕЕ! 

参数 名 称 |Түрі... 参考 打印 缺 省 什 [B]... ра... | 短文 本 m. 

IR REQUEST TYPE. IF RSBK REQUES.. ІЛ | [V] Interface Between IPRO Admin Tab ^ 

I REQUEST TYPE RSREQUEST (1 М жж сир м 

I DATAPACKID TYPE RSDATAPID М М 数据 文档 编号 | 

IS PARAMS TYPE ZDEDW PZ 01 ММ DER і 

4» асты 4» == 

«|» 4|» 
EP b | SE37 ” | WINECC6 | INS 5 |аў 


3-8 B AGED SER 
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E 函数 模块 (E) ”编辑 (E) EG) ”实用 程序 (M) Environment 系统 (Y) ЖУН) ЕУ” 
е ë -jaH eoe вив атая па ов 


УР 3 z "ED 人 


= 917% 80 0 s | = 


07СТ 0501 7ТСТ OO. 


ЗЕН AQ 模式 程序 美化 器 өтін 
Function module [zem 25 orcr psoi ZTCT 001 ”| 活动 = 
Source code Е 
XERA BE 
enem те | ай [Pass val.. БЖ | жа 
Г] P 
D ç 
= es | t= 
口 
БІН 
口 
口 
口 
| JEN Ë _ 
口 
口 
| 口 ^ 
Ша] x 
«|, Mid FL 
‹› || m ШЕШІ 
ED D | 6ЕЗ7 ~ | WINECCG | INS "og 
图 3-9 输出 参数 维护 界面 
СЕ ”函数 模块 (F) ”编辑 (E) ” 转 到 (6) ”实用 程序 (M) Environment (Y) ”帮助 (H) = 


© qü eqe вбив апаа поа ов 


Ф917 % G Ga p Gb RADH G GQ ut EF пауы 


- 


Function module [арн gs orcr psoi ZTCT 001 ”| 活动 - 


四 图 图 БӘ 
вве |Tpng ”| 参考 J 印 laea |optonal |равз Уа... еж E 
CS RESULT FIELDS 口 imi ia 


` 


иии иии! ши! иии [и] 
оооооооооооо 


«^ Ex) Un g 
41» m 4 


ЕТУ р | 5Е37 " | wmecc6 |1051 | I a „ 


图 3-10 参考 结构 维护 界面 


[= 函数 模块 (E) ”编辑 (E) ” 转 到 (G6) ”实用 程序 (M) Environment ”系统 (Y) ”帮助 (H) 00И 
в ë -jaH eee Bm anan пт от 


= 9199 wp Оаа mov S DH AR ss 程序 美化 器 函数 模块 文档 
Functon module Гас A а : 


үзір 图 图 
CI RESULT PACKAGE сә 
ІСТ LOCAL PACKAGE Б: 
ІСТ MONITOR TYPE | TY T MONITORS 
D» 
D» 
口 
口 
口 
口 
口 
口 
El " 
D Ads 
ag — —- TE- 
4|» ds «|» 
ED р | 5Е37 ”| wNECc6 NS! | sP „ 
图 3-11 运算 表 维护 界面 
(г 函数 模块 (E) ”编辑 ([E) — 转 到 (G) ”实用 程序 (M) Environment ”系统 (Y) ”帮助 (H) шшш 
в .— X -jaH eee Bum noon пт om 
(USE XE. 4x ZEDW JS OTCT DSO1 ZTCT 001 
е >» 9» uj О аз 1 m d» Е оН QR ss 程序 美化 器 函数 模块 文档 
Function module (реря 25 отст рз01 ZTCT O01 ”| 活动 2 
gg Expo Changing = / Exceptions - ñ 
Lonott | Е 
Е а ы T 
口 
口 
口 
口 
口 
口 
M _ 口 
о 
口 Е 
m < Fr: 三 
El Ya 
Т» ———— 4» |- 
МІ! dis gE 
ED D | SE37 * | WINECC6 | INS “|ж 


3-12 运行 例外 维护 界面 


ГР 函数 模块 (E) ”编辑 (E) WECO KAREM) Environment RAY) AH) ЕБУ 
€ чв еве вив атаа ма om 


一 一 — 


ЖЫН: Si ZEDW JS OTCT DS01 ZTCT O01 ` 
< =» uu @ вз 1 B A PE DH AQ s 程序 美化 器 函数 模块 文档 


Function module Ea JS 0ТСІ 0501 ZTCT O01 ”| 活动 


a 


- 


EQUEST) TYPE  RSREQUEST OPTIONAL 
ATAPACKID) TYPE RSDATAPID OPTIONAL 
VAL PARAMS) TYPE  ZDEDW PZ 01 OPTIONAL 


CI RESULT PACKAGE OPTIONAL 
AL PACKAGE OPTIONAL 
CI ЖОЙТТОК TYPE RSIR TY T MONITORS OPTIONAL 


EAM T TNG 
ДЕРЕЛЕШЕ (5. RESULT FIELDS) 
RATSING 
1T ж” CX RSROUT АВО? 
19: BREAK-POINT. 


21 DATÀ:gt statinfo TYPE STANDARD TABLE OF rsddstatinfo, 
22 gt statheader TYPE STANDARD TABLE OF rsddstatheader, < 
25) gt rsrrepdir TYPE STANDARD TABLE OF rsrrepdir, 
24 gt rsxclsxref TYPE STANDARD TABLE OF rsxclsxref. bd P 
4» 2 4!» = 
< Е 4“ 
E 7 D SE37 ” | WINECC6 | INS ай 


图 3-13 ”代码 逻辑 维护 界面 
3.1.4 面向 对 象 的 Class 程序 


传统 的 АВАР/А 语言 使 用 通常 所 说 的 逻辑 流 的 方式 进行 代码 的 编写 ， 和 面向 对 象 的 方式 
存在 较 大 区 别 ， 因 此 SAP 又 在 传统 代码 的 基础 上 开发 了 面向 对 象 的 Class 程序 维护 工具 。 
Class 程序 和 功能 函数 类 似 ， 但 它 属于 面向 对 象 的 概念 ， 有 封装 和 继承 等 特性 

Class 程序 可 以 使 用 事务 代码 SE24 或 SE80 进行 维护 ， 用 户 自 定 义 的 Class 程序 命名 通常 
以 “Z” 或 “Y” 开 头 。 主 维护 界面 如 图 3-14 所 示 ， 属 性 维护 界面 如 图 3-15 所 示 ， 接 口 维 
护 界面 如 图 3-16 所 示 ， 友 元 维护 界面 如 图 3-17 所 示 ， 属 性 维护 界面 如 图 3-18 所 示 ， 方 法 
维护 界面 如 图 3-19 所 示 ， 事 件 维护 界面 如 图 3-20 所 示 ， 类 型 维护 界面 如 图 3-21 所 示 ， 别 
名 维护 界面 如 图 3-22 所 示 。 


[= 对象 类 型 (0) ”编辑 (E) ” 转 到 (G6) ”实用 程序 (U) Environment RACY) ”帮助 (H) шши 
е "Y| чв еае ым апаа ов 
ЖЕ. EFK | 


аз | @© ЕШ жина 


对 象 类 型 /ZDIR LOCK MGR |=) 


еа |р mk JO 创建 


ED D | SE24 * | WINECCG | INS 29 
3-14 主 维 护 界面 
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Æ %(0 ”编辑 ([E) ” 转 到 (G) ”实用 程序 (U) 系统 (Y) ЖЕШИН) 


е чв еае BAR аъла иа om 


€ => “29; 8 @ аз 1 mo» 2 2 UJ] SE |Н Енен E оса Test casses | 


[2015 LOCK McR ] 已 实现 
友 元 方法 Р i 


Environment 


» 


/ 活动 


超 类 % 撤消 继承 ^ 更 改 继承 2 
[Lock Manager ] 
0318 v 


"EE | С! 
| шаман, 
v 类 型 组 /对 象 类 型 _! 
ТЕТЛІГІЗ +] І г 
[5 
IE 
[РАНХТЕ [2010.10.26] 
[РАНХТЕ [2010.10.26] К^ 
4» [ da ш: 
[БАР D | SE24 ~ | WINECC6 | INS = | 
13-15 属性 维护 界面 1 
[E 类 (C) HEE) ” 转 到 (G6) ”实用 程序 (U) Environment ”系统 (Y) ”帮助 (H) == 


Г — -—laHeoe вин апаа mmo 


е» ZEA а) Gb o» ds EUIS HE жн оса Test Classes 


| » 


类 接口 ZDIR LOCK MGR ] 已 实现 / 活动 
EE P £A | 
B EHE ва 
n » 最 终 — | 仅 模型 化 描 术 m 
IFC2DIR LOCK MGR m r1 | D Lock Manager x 
Ë Ге DN R БІН ы 
[ДЕЛ ЕЕ [ЕЛЕ 
а к> 
um = His maa miw m 
ІНЕ а= URS Е _ i 
ПЕШІ mai 
ТШ ШЕРІ mm 
[ЇЇ ы е 
ГД ЕТ БИ 
ra Г к | е z 
EX и к “ 
1» — —— , 
E D | SE24 ~ | WINECC6 | INS t | y 


图 3-16 接口 维护 界面 
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[E 类 (C) ”编辑 (E) WEG 。 实用 程序 (U) Environment ЖОҚУ) ”帮助 (H) шш 
€ чв еае вив snos gm omm 


е» “29 ujG sb mu 8 U] SE Н Ени E Local Test Cdases | й 


类 接口 ZDIR LOCK MGR ] 已 实现 / 活动 
СЕН (ап C4 (ла (ян (әш (a | 
BE 
| EE E NN 了 | m 
(сәті; LOCK | MGR_FACTORY Factory Lock Manager | ыты 
ШЕ!) T 
D 
Ba E 
m ZEB mu Е 
D 
| B | 
D 
|a 
ШЕ 
ж 
ET v 
4» ды 4» 
[БАР D | SE24 * | WINECC6 | INS “| 


3-17 友 元 维护 界面 


Æ 类 (C) RE) ” 转 到 (6) ”实用 程序 (U) Environment ”系统 (Y) ”帮助 (H) Б” 
@ "| q B eoe BAR апаз Eg) өт 
Ж, . лу: "DIR LOCK MGR 
= > “9 dj () аз p GB d Е 0 SE HE ажи оса Test casses | ч 
类 接口 —— 
ex : ENQMODE. EXCLUSIVE Constant Pubic [J Type 
(GC ENQMODE ОРТІМІЗТІС Constant Public Г] Type 
(GC ENQMODE PROMOTE ОРТ Constant Public ПП туре 
AT LOCK INFOS Instance .. Private О Туре 
шемын — lInstance „Private — []Tme 6 0 _ 
== - | Dr — 
| Г] туге 
О Туре 
О Туре 
Г] Туре 
ja Type 
ІП туре 
JU 
E D | SE24 * | WINECC6 | INS н | 
| 3-18 ”属性 维护 界面 2 


[E 类 (C) ”编辑 (E) ” 转 到 (6G) 。 实用 程序 (U) Environment ЖОҚУ) ”帮助 (H) шш 
€ ча еае вив ата m= m 


| 方法 юй али л. m 
[LFC2DIR LOCK MGR-LOCK JInstanc.. Public ^ 
IFC2DIR LOCK MGR-UNLOCK Instanc. Public T 
IFC2DIR LOCK MGR-RELOCK ALL — Instanc. Public E 
IFC2DIR LOCK MGR-UNLOCK ALL — Instanc. Public 
CONSTRUCTOR Instanc. Public fe 
= 
` 
aD JD 
ED D | 5Е24 ” | WINECC6 | INS HI 


3-19 方法 维护 界面 


区 类 (C) RE) ” 转 到 (6) ”实用 程序 (U) Environment ”系统 (Y) ”帮助 (H) LC а 
ө 1—4 в еге вин апаа mm ов 


= 5? 92 ч] @ лі | P СЕ Н жне оса те Савез |  ”? 
类 接口 Ee — S, ML 


ED D | SE24 * | WINECC6 | INS tsi | y 


图 3-20 事件 维护 界面 


ІР 类 (C) ИМЕ) ” 转 到 (G) ”实用 程序 (U) Environment ”系统 (Y) ЖУН) ышы 
e чв еге BAR anaa Elm pm 


Жота. Ел ZDIR_LOCK_MGR | m a 
е-е» 993 uj @ з 1 @ б а 8 ЕН нех оса Тез Casses | v 


类 接口 ZDIR LOCK MGR 已 实现 / 活动 


性 【接口 (Em (ЕН (5 事件 别名 


ЕТЕ EE KER |=] (a) Пішен 

жя (ШАН ел вани | 描述 
Түре 
Түре 
Түре 
Type 
Type 
Type 
Type 


‹› 


L + 


ци 


ED D | SE24 * | WINECC6 | INS EE 


图 3-21 类 型 维护 界面 


ІР 类 (C) ИМЕ) ” 转 到 (G) ”实用 程序 (U) Environment 系统 (Y) ”帮助 (H) LEAD 
€ | „ча еге BAR апаа па @ m 
ЖЮ. Бжі20ІК LOCK MGR a 
е» 79% @ аа т mb o» 8 О ЧН жне оса тез casses | > 
类 接口 [BDIR тоск мов | 已 实现 / 活动 
ЕВ 【接口 上 友 元 【属性 [方法 (ЖЕ 【类 型 
BA) МЕ Гр 
впав яв jm —| m 
IFC2DIR LOCK MGR-LOCK % L 1, ж 
IFC2DIR LOCK MGR-RELOCK ALL € = 
IFC2DIR LOCK MGR-UNLOCK % Ë 
IFC2DIR LOCK MGR-UNLOCK ALL Hi | 
ID e 
EZ D | SE24 * | WINECC6 | INS - 


图 3-22 别名 维护 界面 
3.2 SAP 系统 的 增强 概念 简介 
虽然 ЗАР 系统 能 够 满足 大 部 分 情况 下 的 业务 流程 和 数据 处 理 ， 但 是 考虑 到 用 户 实际 的 


业务 流程 有 可 能 和 系统 默认 的 标准 流程 不 同 ， 此 时 如 果 直 接 修改 SAP 标准 的 代码 显然 不 是 
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最 优选 择 ( 因为 没有 在 SAP 网 站 申请 过 客户 修改 记录 的 АВАР 代码 修改 ， 在 升级 过 程 中 会 
被 直接 覆盖 ， 这 在 很 多 时 候 存 在 巨大 风险 ) ， 因 此 ЗАР 提供 了 增强 的 功能 ， 让 用 户 可 以 在 标 
准 程序 中 添加 自己 的 功能 ， 而 又 不 破坏 系统 的 标准 程序 。 

SAP 增强 实际 上 就 是 : 在 系统 中 标准 程序 的 接口 ， 每 个 接口 对 应 一 个 客户 化 功能 模块 ， 
这 些 功能 模块 有 标准 处 理 程序 传人 的 参数 和 输出 参数 ， 用 户 可 以 根据 系统 输入 参数 ， 以 此 作 
为 条 件 编写 适合 本 企业 流程 和 数据 处 理 的 逻辑 ， 然 后 通过 输出 参数 传递 给 SAP 标准 程序 。 
通常 来 说 ， 现 在 的 SAP 增强 可 以 分 为 5 个 类 别 ,分 别 是 “第 一 代 User Exit” “第 二 代 User 
Exit” “字典 增强 Append Structure”“BAdI” 和 “业务 交易 事件 BTE”，R/3 46C 之 前 版 本 的 
“Field Exit” 已 经 基本 不 使 用 了 ， 因 此 没有 被 算 在 SAP 增强 范围 之 内 。 


3.2.1 第 一 代 User Exit 


SAP 第 一 代 增强 技术 ， 其 原理 就 是 在 程序 中 预先 置 放 一 个 Form…EndForm 的 子 程序 ， 并 
在 程序 运行 时 Call 这 个 Form。 当 然 ， 如 果 这 个 Form 是 空 的 ， 那 么 不 执行 任何 操作 ， 反 之 ， 执 
行 相应 的 动作 。 第 一 代 User Exit 的 写法 和 修改 标准 程序 是 一 致 的 ， 要 有 向 SAP 申请 的 Access 
Key 才能 对 这 些 程序 进行 修改 。 与 修改 标准 程序 的 区 别 在 于 ， 在 SAP 做 升级 的 时 候 ，User Exit 
会 自动 保留 ， 而 标准 程序 代码 的 修改 如 果 不 做 特殊 处 理 ， 则 升级 时 就 面临 被 覆盖 的 风险 。 


3.2.2 第 二 代 User Exit 


第 二 代 User Exit， 也 被 称 为 Customer Exit， 即 用 户 自 定义 出 口 。 在 SAP 系统 中 存在 着 3 
类 这 样 的 出 口 ， 分 别 是 功能 模块 出 口 、 菜 单 出 口 和 屏幕 出 口 。 一 般 接触 最 多 的 就 是 功能 模块 
出 口 。 使 用 功能 模块 出 口 时 ， 有 两 个 常用 的 事物 码 ，CMOD 用 于 增强 项 目的 管理 ，SMOD Jš 
强项 目的 具体 实现 。 

功能 模块 出 口 就 是 在 标准 程序 中 预 置 形 如 CALL FUNCTION! NNN 的 CALL FUNCTION 
语句 ， 来 动态 调用 相关 的 出 口 程序 ,， “МММ” J& 3 位 数字 ， 而 实际 的 出 口 函 数 命 名 方式 为 ; 


EXIT_ < program name > < exit number >; 


3.2.3 FM Append Structure 


字典 增强 就 是 对 于 透明 表 及 结构 的 增强 ， 它 主要 两 种 形式 ， 一 种 是 Append Structure, 
另 一 种 是 Include , 

Append Structure 可 以 扩展 原来 的 表 结 构 ， 但 是 并 不 是 在 原来 的 表 上 加 字段 ， 而 是 再 建 
一 个 附加 的 结构 ， 数 据 在 物理 上 是 存在 两 处 的 。 而 且 一 个 Append Structure 只 能 有 一 张 表 结 
构 。 如 果 把 有 Append Structure 结构 的 表 进 行 复 制 ， 那 么 在 新 的 表 中 ， 原 有 的 Append Struc- 
ture 就 变 成 了 固定 字段 ， 物理 表 也 变 成 一 张 表 。 

Include 多 见于 由 于 增强 而 自动 生成 的 表 字 段 ， 如 做 屏幕 增强 时 。 当 然 ， 用 户 也 可 以 自 
СЕУ, ЖЕ Append Structure, Include 就 可 以 包含 多 张 表 结 构 。 需 要 说 明 的 是 ， 它 不 具有 
Append Structure 的 “复制 ”性 能 ， 即 使 复制 还 是 会 以 原 结 构 存 在 于 新 表 中 。 


3.2.4 BAdI 


ВА (Business Add - In, BAdI) 是 SAP Æ R/3 4. 6A 版 本 之 后 增加 的 新 增强 技术 。 总 
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体 来 说 ，BAdI 克服 了 之 前 出 口 的 所 有 缺点 ， 并 且 还 是 用 最 新 的 АВАР ОО 技术 实现 。 不 过 在 
项 目 中 ， 使 用 BAd 的 顾问 还 是 比较 少 ， 在 相同 效果 的 情况 下 多 数 还 是 使 用 Customer Exit 和 
User Exit 来 完成 工作 。 

其 实 ，BAdI 就 是 汇集 了 SAP 之 前 的 增强 技术 之 长 ， 在 标准 程序 的 业务 对 象 上 预 留 了 出 
口 ， 通 过 面向 对 象 的 接口 技术 ,使 得 增强 更 加 灵活 。 


3.2.5 业务 交易 事件 BTE 


业务 交易 事件 (Business Transaction Events, ВТЕ) 是 SAP 最 新 的 一 种 增强 方式 ， 从 技 
术 上 讲 是 介 于 Customer Exit 和 BAdI 的 产物 。 

业务 交易 事件 主要 有 两 种 类 型 的 接口 : Publish and Subscribe Interface 和 Process Inter- 
face， 其 核心 的 理念 是 ， 使 一 个 接口 可 以 被 重复 利用 ， 多 种 实现 且 互 不 干扰 。 而 技术 实现 
时 ， 就 在 标准 程序 中 调用 固定 的 一 个 功能 模块 ， 然 后 再 用 这 个 功能 模块 动态 调用 自 定义 的 增 
强 功能 模块 ， 从 而 达到 预期 目的 。 这 样 的 接口 ， 在 标准 程序 中 常常 是 以 OPEN_FI_PERFORM_ 
或 OUTBOUND_CALL 开头 的 功能 模块 。 


3.3 BW 中 的 系统 增强 点 概览 


BW 数据 仓库 的 建 模 过 程 ， 实 际 上 就 是 由 从 源 系统 (如 SAP ЕВР 和 CRM 等 ) 抽取 数据 、 
BW 系统 加 载 数据 、BW 系统 数据 仓库 管理 、 报 表 数 据 展 现 、 用 户 分 配 和 权限 管理 等 过 程 构 
成 的 。 在 此 过 程 中 ， 根 据 用 户 的 不 同 需求 ， 需 要 对 标准 的 业务 功能 进行 各 式 各 样 的 增强 ， 
图 3-23 展示 了 整个 BW 系统 在 建设 过 程 中 能 够 对 系统 相关 功能 进行 程序 增强 处 理 的 关 
键 点 。 


图 3-23 BW 数据 仓库 中 的 系统 增强 点 


在 图 3-23 中 ， 主 要 侧重 于 在 后 台 对 于 BW 系统 的 功能 进行 增强 ， 在 用 户 前 端 和 系统 运 
行 方 面 本 身 感 觉 不 到 这 些 增 强 的 存在 ， 因 此 可 以 认为 功能 增强 对 系统 运行 和 最 终 用 户 的 使 用 
透明 。 系 统 增强 的 几 个 方面 ， 也 是 分 布 在 数据 从 源 系统 抽取 一 直到 最 终 展 示 的 各 个 流程 和 环 
节 上 ， 包 括 数据 抽取 、 数 据 加 载 、 数 据 存储 、 数 据 展示 和 系统 运行 等 。 
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3.4 ЯР BW 增强 的 ABAP 指引 


提 到 BW 数据 仓库 的 АВАР 增强 处 理 ， 就 不 得 不 提 到 大 数据 量 处 理 以 及 用 户 自 定义 
АВАР 语言 代码 中 的 性 能 问题 。 根 据 笔者 经 验 ， 即 使 最 小 的 企业 也 往往 会 有 超过 百 万 条 的 数 
据 需要 处 理 ， 特 别 是 在 系统 进行 初始 化 数据 上 载 期 间 ; 大 型 的 企业 ， 如 世界 500 强 企 业 ， 有 
时 往往 初始 化 数据 上 载 就 有 超过 几 十 亿 条 的 数据 需要 处 理 ， 即 使 在 日 常 的 增 量 数据 上 载 过 程 
中 ， 仅 财务 凭证 行 项 目 数据 加 载 一 项 ， 每 天 可 能 就 有 超过 千 万 条 的 数据 需要 进行 处 理 ， 因 此 需 
要 将 自己 编写 的 代码 最 大 程度 地 提高 性 能 ， 以 适应 日 益 升 高 的 数据 加 载 和 查询 性 能 的 需求 。 

举例 说 明 ， 某 世界 500 强 企 业 ， 下 属 企业 超过 100 Ж, ЕВР 系统 建设 采用 分 布 式 部 署 方 
З, ERP 系统 硬件 超过 50 套 ， 每 天 总 部 需要 查看 前 一 天 企业 的 所 有 数据 交易 明细 ， 以 便 进 
行业 务 监管 。 假 设 每 天 从 每 个 企业 抽取 的 数据 量 是 50 万 条 (实际 上 的 数据 量 可 能 远 不 止 50 
万 条 ) ， 那 么 每 天 需要 处 理 的 数据 量 是 超过 5 000 万 条 的 。 如 果 未 进行 优化 的 增强 程序 平均 
运行 一 条 数据 需要 2 ms， 经 过 优化 的 增强 程序 平均 运行 一 条 数据 需要 1 ms， 那 么 每 天 就 能 将 
数据 增强 的 时 间 从 2. 8 h 缩短 到 1.4h， 所 以 就 算是 最 小 的 性 能 提升 努力 ， 在 如 此 庞大 的 数据 
量 面前 也 显得 十 分 必要 。 

抛 开 硬件 的 性 能 和 数据 库 的 读 写 性 能 不 说 ， 高 性 能 的 程序 组 成 部 分 在 BW 数据 仓库 中 算 
得 上 是 表 类 型 (Table Types) 和 指针 的 使 用 了 ， 下 面 将 对 “ 表 类 型 ”和 “指针 ”进行 详细 
说 明 。 

3.4.1 АВАР 语言 中 的 表 类 型 


在 BW 数据 仓库 中 ， 通 常 是 在 用 户 出 口 或 BADI 增强 中 对 数据 进行 处 理 ， 而 不 是 自己 编 
写 整 段 代码 来 进行 自 定 义 的 开发 ， 因 此 只 是 在 数据 处 理 的 几 个 不 同 的 点 对 数据 和 内 表 进 行 读 
写 操 作 。ABAP 中 的 不 同 表 类 型 提供 了 不 同 场景 下 的 最 佳 访 问 性 能 ， 因 此 只 需要 在 不 同 的 场 
景 下 选择 不 同类 型 的 内 表 即 可 ， 这 看 起 来 并 不 是 一 件 十 分 困难 的 事情 。 

总 体 来 说 ，ABAP 提供 了 以 下 几 种 类 型 的 内 表 。 

1. 标准 内 表 

标准 内 表 (STANDARD TABLE) 既 不 限制 排序 字段 ， 也 不 限制 访问 方式 ， 因 此 可 以 在 
任何 场景 、 任 何 地 方 ， 对 标准 内 表 进 行 任何 字段 的 排序 或 根据 任何 一 个 字段 进行 随机 访问 或 
随意 地 插入 一 条 新 的 数据 。 

正 是 由 于 这 样 的 灵活 性 ， 给 系统 的 性 能 带 来 了 负面 影响 ， 降 低 了 标准 表 的 访问 速度 。 尤 
其 需要 指出 的 是 ， 标 准 表 的 读 取 速 度 十 分 低下 ， 因 为 为 了 寻找 到 需要 的 记录 ， 很 可 能 整个 表 
的 内 容 都 需要 遍历 一 次 。 

2. 排序 表 

排序 表 (SORTED TABLE) 是 根据 一 个 特定 的 字段 进行 了 排序 的 内 表 。 排 序 字段 不 需 
要 唯一 ， 也 就 是 说 允许 重复 。 根 据 该 字段 或 该 字段 的 前 面 某 一 部 分 进行 访问 的 速度 要 大 大 高 
于 标准 表 。 但 是 ， 如 果 不 根据 该 字段 进行 访问 ， 则 其 速度 和 标准 表 相 差 无 儿 。 需 要 说 明 的 
是 , 虽然 读 取 速度 相对 较 快 ， 但 是 内 表 的 数据 插入 相对 标准 表 要 慢 一 些 ， 因 为 系统 需要 寻找 
到 该 条 数据 插入 的 详细 排序 位 置 。 
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排序 表 有 两 大 好 处 ,一 是 有 相同 键 值 的 数据 记录 会 被 自动 避免 ， 二 是 基于 某 个 字段 的 内 
表 循 环 处 理 (LOOP AT) 尤为 快速 。 对 于 排序 表 最 关键 的 就 是 排序 字段 ， 用 户 必须 保证 所 
有 对 于 排序 表 的 访问 都 是 基于 该 排序 字段 进行 的 。 示 例 : 有 一 个 排序 表 L_T_SORTDEMO， 
其 有 4 个 字段 ， 分 别 是 C1、C2 C3 和 CA, HP C1 是 排序 字段 ， 那 么 在 相同 目标 数据 量 的 
情况 下 ， 语 句 : 


LOOP AT L T SORTDEMO WHERE C1 2 XYZ . 


ENDLOOP. 


要 比 以 下 代码 段 的 性 能 有 显著 提升 : 


LOOP AT L T SORTDEMO WHERE C2 2 АВС 
AND C3 2 BKPF 
AND C4 = 1860 . 


ENDLOOP. 


在 第 一 种 情况 下 ， 系 统 根据 排序 字段 能 够 进行 精确 地 查找 ， 读 取 所 有 符合 条 件 的 内 表 
行 ， 直 到 C1 的 值 不 等 于 “XYZ” 为 止 ， 因 为 有 了 排序 ， 所 以 该 过 程 能 够 迅速 完成 。 

在 第 二 种 情况 下 ， 系 统 需 要 对 内 表 的 每 条 行 明细 进行 读 取 和 比较 ， 直 到 整个 内 表 读 取 和 
比较 完毕 为 止 ， 因 此 大 大 降低 了 程序 处 理 的 性 能 。 

3. Ке 

哈 希 表 (HASHED TABLE) Æ BW 数据 仓库 的 增强 程序 处 理 中 尤为 重要 ， 因 此 必须 熟 
练 地 掌握 该 种 表 类 型 。 哈 希 表 在 内 表 定 义 时 ， 就 指定 了 需要 访问 的 一 个 或 几 个 字段 作为 键 
值 。 与 标准 表 和 排序 表 不 同 的 是 ， 哈 希 表 的 访问 采用 索引 的 方式 进行 ， 对 某 个 单独 数据 条 目 
的 访问 能 够 通过 指定 的 字段 在 近乎 一 定 的 时 间 内 完成 ， 该 时 间 甚 至 不 受 表 条 目 总 数 的 影响 。 
这 个 属性 对 于 BW 来 说 相当 有 用 ， 因 为 用 户 只 是 在 增强 程序 的 某 个 点 或 某 些 点 对 内 表 数 据 进 
行 访问 ， 而 数据 量 的 大 小 事先 也 不 能 准确 得 知 。 

示例 : 上 载 成 本 中 心 行 项 目 交易 数据 ， 此 时 系统 提供 了 成 本 中 心 的 信息 ， 假 设 系统 本 身 并 
没有 提供 利润 中 心 的 信息 ， 就 需要 从 成 本 中 心 的 主 数据 中 读 取 利润 中 心 的 信息 ， 语 名 如下。 


IF comm, structure — profit. ctr = SPACE. 
* No data filled profit center field 
IF 1 1 совіспегег| | IS INITIAL. 
SELECT ж FROM /bi0/qcostcenter 
INTO TABLE 1, t. costcenter 
WHERE objvers 2. A 
and DATEFROM <= sy - datum 
AND dateto >= sy - datum. 
ENDIF. 
READ TABLE 1 t costcenter 
INTO 1, s costcenter 
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WITH TABLE KEY 
Co, area = comm - structure - со area 
costcenter — comm - structure - costcenter. 
IF sy - subre -0. 
result 2l s costcenter — profit, ctr. 
ELSE. 
result 2 DUMMY . 
ENDIF. 
ELSE. 
result = comm - stucture - profit ctr. 


ENDIF. 


看 起 来 ， 数 据 表 L T COSTCENTER 包含 数 千 条 数据 ， 但 是 对 于 数据 表 的 读 取 却 只 是 在 
出 口 的 特定 地 点 。 如 果 用 户 有 成 千 上 万 的 数据 需要 人 处理， 那么 就 需要 进行 成 千 上 万 的 READ 
TABLE 操作 。 因 此 ， 最 好 使 用 哈 希 表 进 行 数据 的 处 理 ， 因 为 每 次 读 取 时 都 只 是 按照 关键 字 
段 进 行 访问 。 

对 于 该 哈 希 表 的 定义 如 下 : 


DATA: l_t_costcenter TYPE HASHED TABLE OF /bi0/qcostcenter 
WITH UNIQUE KEY co. area costcenter INITIAL SIZE 0. 


3.4.2 对 内 表 的 循环 访问 处 理 

为 了 更 好 地 理解 和 正确 地 使 用 内 表 读 取 方 法 ， 表 3-1 列 出 了 几 种 不 同 的 对 于 内 表 的 读 
取 方 法 ， 包 括 对 应 方法 的 运行 时 间 。 为 了 获得 更 好 的 性 能 ， 可 以 尝试 更 换 一 种 数据 内 表 的 读 
取 方 法 和 内 表 类 型 。 


表 3-1 不 同 访问 语句 对 不 同 表 类 型 的 访问 性 能 比较 


访问 类 型 标 准 表 排 序 表 哈 їй X 
系统 将 根据 KEY 逐 行 
READ TABLE WITH КЕҮ 地 比较 值 ， 直 到 找到 需要 整个 表 都 将 被 扫描 一 遍 整个 表 都 将 被 扫描 一 遍 
的 数据 记录 为 止 
二 叉 扫 描 将 会 被 使 用 ， 系统 根据 哈 希 进程 直接 
READ TABLE WITH TABLE KEY 整个 表 都 将 被 扫描 一 遍 | 该 方法 比 整个 表 的 扫描 | 访问 指定 记录 ， 而 且 时 间 
快 ， 但 是 不 如 直接 访问 | 近乎 为 常数 
READ TABLE… 系统 根据 指定 的 序号 直 | 系统 根据 指定 的 序号 直 不 能 使 
INDEX... 接 访问 ， 时 间 近 乎 为 常数 | 接 访问 


如 果 WHERE 条 件 中 包 
括 排序 字段 ， 那 么 扫描 的 
LOOP АТ TABLE WHERE--- 整个 表 都 将 被 扫描 一 遍 | 时 间 将 和 READ TABLE | ”整个 表 都 将 被 扫描 一 遍 
WITH TABLE KEY 一 样 ， 
否则 整个 表 都 会 被 扫描 
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虽然 访问 内 表 的 性 能 取决 于 很 多 其 他 因素 ,但 是 根据 统计 来 看 ， 哈 希 表 的 性 能 明显 高 于 
排序 表 ， 而 排序 表 的 性 能 又 明显 高 于 标准 表 。 


3.4.3 指针 的 应 用 


另外 一 a es 指针 最 初 的 设计 目的 是 用 来 降低 数 
据 从 一 个 变量 转移 到 另 一 个 变量 的 耗费 时 间 ， 特 别 是 将 表 的 某 行内 容 转 移 到 工作 区 时 ， 实 践 
证 明 指针 对 于 比较 宽 人 很 多 字段 的 工作 区 尤其 有 效 。 而 以 上 的 这 些 特点 正好 是 
BW 数据 仓库 数据 处 理 中 所 具备 的 。 

使 用 指针 的 另外 一 个 好 处 是 因为 指针 属于 间接 访问 ， 所 以 程序 代码 就 具有 更 高 的 灵活 
性 。 例 如 ， 有 好 多 项 目 组 同时 对 数据 模型 和 增强 程序 进行 更 改 时 ， 可 以 使 用 代码 段 
IF < FIELD SYMBOL > IS ASSIGNED 事先 判断 一 下 指针 对 应 的 字段 是 否 存在 ， 如 果 返 回 结果 
为 “FALSE”， 则 后 续 的 代码 段 将 不 会 继续 执行 ， 从 而 避免 因 项 目 组 之 间 对 于 模型 传输 的 先 
后 顺序 而 导致 的 代码 段 字段 无 法 读 取 ， 进 而 避免 数据 上 载 系统 报错 的 情况 发 生 。 

虽然 总 体 来 说 ， 指 针对 于 性 能 的 提升 不 像 表 类 型 的 影响 那么 大 ,但 是 这 并 不 妨碍 在 代码 
中 更 多 地 使 用 指针 。 

表 3-2 包含 了 使 用 指针 相关 的 重要 语句 示例 。 

表 3-2 使 用 指针 的 相关 语句 和 说 明 
语 б] jJ — d 3€ 
尽量 使 用 指定 类 型 的 指针 ， 如 果 需 要 ， 
则 可 以 使 用 ANY x ANY TABLE (5% 
指针 «fs » 被 指向 变量 var， 对 指针 的 
ASSIGN var to < fs > 将 指针 «fs» 指向 变量 var. | 任何 操作 都 相当 于 对 变量 var 的 操作 ， 
到 < 名 > 被 指向 下 一 个 对 象 


如 果 指 针 < fs > 继续 指向 var， 那 么 变 


FIELD -SYMBOLS: « fs » ТҮРЕ type/ANY 定义 指针 < fs > 


—À 将 武 给 指针 < s 
<fs >=123 将 值 123 赋 给 指针 < fs > B var 就 被 赋 信 123 
由 于 这 样 的 处 理 不 需要 将 tab 的 当前 行 
复制 到 表 头 ， 因 此 在 不 带 表 头 的 表 中 经 
在 循环 中 , < 名 > 指向 tab X | 常 这 样 处 理 ， 如 果 是 比较 宽 的 表 或 本 身 
LOOP АТ tab ASSIGNING « fs 
| к= 的 当前 行 包含 其 他 表 的 表 ， 则 能 获得 最 好 的 性 能 
提升 ， 总 的 说 来 ， 该 处 理 能 够 在 大 于 5 
行 的 处 理 中 获得 高 性 能 


在 表格 宽度 大 于 1 000 B 的 表格 中 使 用 
句 能 够 提升 性 能 ;如 果 和 希望 用 MOD- 
READ 读 取 的 结果 将 会 被 赋 | IFY 对 表 内 容 进 行 更 改 ， 则 也 能 在 表格 

ТЯН <В > 宽度 大 于 1 000 В 的 表 中 提高 性 能 ; 在 哈 

希 表 和 排序 表 中 不 能 对 关键 字段 进行 

MODIFY 操作 


READ TABLE tab ASSIGN < fs > 


3.4.4 数据 存 取 和 缓存 


尽管 大 的 处 理 器 和 多 线程 处 理 技术 已 被 广泛 采用 ， 但 是 数据 仓库 的 瓶 希 依然 主要 存在 于 数据 
的 抽取 过 程 ， 因 为 BW 往往 要 进行 大 量 的 数据 操作 ， 如 写 和 大量 数据 到 数据 库 中 。 如 有 果 对 数据 库 
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进行 频繁 的 读 取 操作 ， 则 数据 库 的 整体 性 能 将 会 有 所 降低 ， 从 而 导致 数据 抽取 过 程 的 延长 。 
示例 : 数据 库 的 访问 次 数 ， 语 句 如 下 。 


IF comm, stucutre - profit. ctr IS INITIAL. 
SELECT SIGNLE ж FROM /bi0/qcostcenter 
INTO |І s costcenter 
WHERE совісешет - comm, stucutre - costcenter 

AND co, area = comm, stucutre - co, area 
AND datefrom <= sy - datum 
AND dateto >= sy — datum 
AND objvers = А. 
IF SY - SUBRC =0. 
RESULT -1 s costcenter — profit, ctr. 
ELSE. 
RESULT = comm, stucutre - profit. ctr. 
ENDIF. 
ENDIF. 


上 述 语句 是 一 个 在 很 多 项 目 或 很 多 系统 中 都 能 经 常 看 到 的 一 段 代码 ， 实 际 上 这 样 的 代码 
对 系统 的 性 能 是 一 种 伤害 ， 即 使 目前 看 起 来 系统 运行 良好 ， 但 是 随 着 系统 数据 量 的 逐渐 增 
大 ， 或 下 一 次 系统 迁移 的 出 现 ， 性 能 问题 最 终 将 会 暴露 无 遗 。 

更 好 的 方法 在 3.4.1 节 中 已 经 举例 说 明 ， 那 就 是 使 用 内 表 的 方式 一 次 性 地 从 数据 库 中 将 
需要 的 数据 读 取 到 缓存 中 ， 然 后 通过 访问 内 表 而 不 是 数据 库 的 方式 得 到 需要 的 数据 。 

ТЕ 3. 4. 1 节 的 示例 中 使 用 了 语句 IF L t eosteneter[ | IS INITIAL, 这 是 因为 数据 通常 会 被 
划分 为 好 多 个 独立 的 数据 包 ， 每 个 独立 的 数据 包 又 是 单独 执行 的 ， 因 此 不 能 准确 地 知道 全 局 
变量 在 执行 的 时 候 是 否 被 填充 了 ， 所 以 在 执行 一 个 新 的 数据 包 的 处 理 时 最 好 先行 进行 判断 ， 
查看 是 否 临 时 缓存 已 经 被 填充 了 ， 这 样 就 减少 了 对 数据 库 的 访问 次 数 ， 从 而 提高 了 性 能 。 如 
果 数 据 包 被 进行 并 行 处 理 ， 则 这 样 的 语句 就 不 能 带 来 处 理性 能 上 的 提升 了 ， 因 为 每 次 单独 处 
理 之 前 ， 缓 存 1 1 соѕіспеіег[ ] 都 是 空 的 。 


3.4.5 ABAP 小 技巧 


与 ERP 系统 中 开发 ABAP 程序 不 同 的 是 ， 在 BW 系统 中 ， 往 往 会 在 各 种 例 程 中 对 数据 
库 和 当前 数据 表 进 行 运行 处 理 ， 很 多 时 候 这 些 处 理 数据 量 是 十 分 巨大 的 ， 因 此 单条 АВАР iË 
句 可 能 对 性 能 产生 致命 的 影响 。 下 面 列 出 BW 系统 中 经 常会 遇 到 的 场景 的 АВАР 语句 小 技 
巧 ， 如 开始 例 程 的 数据 包 删 除 等 ， 供 读者 参考 使 用 。 

1. 避免 过 多 的 LOOP 


Delete from table where Loop at itab. 
Fieldl = condition If itab — fieldl = condition. 
Delete itab. 
Endif. 
Endloop. 
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2. 避免 不 必要 的 数据 库 访问 
Select sum( amount) into target Sum = 0. 
From tab Select amount into add 
Where condition From tab 
Where condition 
Sum = sum + add. 
Endselect. 
3. 重复 使 用 数据 
Select fl f2 13 Select f1 £2 
From tab From tab 
Where condition Where condition 
Select f2 13 
From tab 
Where condition 
4. ЕНІ Select 语句 


Select * fromtab 
For all entries in 1 tab 


Where kunnr 21. kun – kunnr 


Loop at 1l. package 
Select * fromtab 


Where kunnr 21. package - kunnr 


endselect Endselect. 


Endloop. 


5. 缓冲 大 数据 表 到 内 存 


Select * into corresponding fields ой | 


Loop at 1 tab 
tab from db where condition. Select single * from db 

Where Кеуі = conditionl 
Read table 1 tab with key Key2 - condition2. 
Keyl = conditionl Endloop. 


Key2 - condition2. 


3.4.6 АВАР 运行 时 间 分 析 工 具 SE30 


在 BW 系统 中 ， 有 时 不 仅 使 用 标注 的 BW 功能 ,项 目 组 还 会 根据 不 同 的 情况 开发 自 有 部 
分 应 用 ， 如 系统 监控 程序 、BW 存储 结果 和 ЕВР 原始 数据 对 比 等 ， 因 此 自 定义 АВАР 程序 或 
功能 模块 对 于 系统 性 能 来 讲 也 将 产生 至 关 重 要 的 影响 。 

SE30 运行 时 分 析 工 具 ， 提 供 了 详细 的 程序 运行 时 环境 的 数据 ， 对 性 能 调 优 有 很 大 的 帮 
助 。 用 户 可 以 通过 SE30 分 析 事 务 代码 (T - Code) 、 程 序 (Program) 和 功能 模块 (Function 
Module) 的 运行 效率 ， 并 且 可 以 直接 对 比分 析 SQL 语句 的 运行 情况 ， 其 初始 界面 如 图 3-24 
所 示 。 
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хе / 
ООО Reliability of Time Values 


Short Descriptn 
In Dialog 一 In Parallel Session .- 
Os | o Switch On/off | 
回程 序 Z CUBE GENERATE TEST, DATA 
口 功能 模块 Schedule 一 
o For User/Service | 
Measurement Restrictions 一 
жж [E| ПЕ DEFAULT From user (7) 
[ЕРДЕ 
Performance Data File 一 
应 用 程序 SAPLTHFB 
BEHE REMOTE ü 
mE 12012. 08. 06]22:03:35 | 


Не зге іп КЕ | кес 


[a Evae  [ Other Fie... File Info... " mis... 


3-24 АВАР iE fT] TR] 43-89 AA 


TE "In Dialog” 框 内 选中 “事务 "”“ 程 序 ” 或 “功能 模块 ”中 的 一 个 单 选 按钮 ， 然 后 输 
入 需要 分 析 的 事务 码 、 程 序 名 或 功能 模块 名 。 然 后 ， 单 击 有 运行 标志 的 “Execute” 按 钮 ， 则 
程序 将 进入 正常 的 运行 状态 。 在 系统 完成 程序 运行 后 ， 将 自动 进入 图 3-24 所 示 的 界面 。 然 
后 ， 可 以 单 击 左下 角 的 “Evaluate” 按 钮 ， 进 入 分 析 评 价 界面 ， 如 图 3-25 Жж, 


E 

| 运行 时 间 分 析 (L) ШЕ) _ 转 到 (G) 实用 程序 (U) 系统 (Y) 帮助 (H) 

g | шар свое GAR тая HA ІЗ 
运行 时 间 分 析 评 估 : 概述 


E 

事务 ZDSE16 = 显示 DS0 数 据 时 间 21:36:41 
程序 ZDSE16 期 12. 08. 06 
用 户 PAHXIE 


以 微 秒 计 的 执行 时 间 


503, 996 
6, 091, 932 
35, 099 


6,631,027 
e 执行 时 间 包 括 生成 《总 量 》 


3-25 АВАР 运行 时 间 分 析 评 价 界 画 


上 面 的 步 又 基本 完成 了 一 个 最 基本 的 运行 时 间 分 析 。 在 分 析 评 价 界面 中 可 以 看 到 程序 在 
各 个 部 分 所 消耗 的 时 间 ， 进 而 判断 程序 的 运行 效率 。 

1. 输入 界面 计量 栏 

将 鼠标 放置 到 “Reliability of Time Values” 前 面 的 绿色 运行 标识 处 可 以 看 到 当前 处 理 器 
的 个 数 。 在 运行 之 前 ， 也 可 以 在 “Short Descrip" 处 输入 简短 的 描述 ， 以 便 日 后 查询 。 

2. In Parallel Session 

单 击 按钮 “Switch On/Off" HARR AHIR, WE 3-26 所 示 。 

在 选择 一 个 进程 ， 并 单 击 激活 按钮 i 后 ， 即 可 看 到 在 进程 前 面 出 现 一 个 黄色 的 小 三 角 
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标识 ， 如 图 3-27 所 示 。 


Number Оп 类 型 处 理 状态 等 待 执行 时 间 用 户 名 报告 动作 表 KB Nane 
0 DIA 运行 PAHXIE SAPLTHFB 
1 DIA 等 待 
2 DIA 等 待 
3 DIA 等 待 
4 DIA 等 待 
5 DIA 等 待 
6 DIA 等 待 
T DIA 等 待 
8 DIA 等 待 
9 DIA 等 待 
10 UPD 等 待 
11 ENQ 等 待 
12 BTC 等 待 
13 BTC 等 待 
14 BTC 等 待 
15 SPO 等 待 
16 UP2 等 待 


г 


ТА 


3-26 系统 后 台 进 程 列表 


Number Оп 类 型 处 理 状态 ЖЕ 执行 时 间 НРА 报告 动作 表 KB Nane 
Q^ DIA 运行 PAHXIE SAPLTHFB 
1 DIA 等 待 
2 DIA 等 待 
3 DIA 等 待 
4 DIA 等 待 
5 DIA 等 待 
6 DIA 等 待 
7 DIA 等 待 
8 DIA 等 待 
9 DIA 等 待 
10 UPD 等 待 
11 ENQ 等 待 
12 BTC 等 待 
13 BTC 等 待 
14 BTC 等 待 
SPO 等 待 
16 UP2 ж 


3-27 ”选中 某 个 系统 后 台 进 程 


在 一 次 Measurement (计量 ) 结束 后 ， 在 work process 清单 中 会 列 出 完成 的 结果 和 Meas- 
urement 文件 的 路 径 ， 指 示 灯 为 绿色 结束 标识 。 如 果 选 择 并 行 执 行 ， 则 效率 会 提高 ， 并 且 可 
以 查看 每 一 个 进程 的 runtime Measurement 结果 和 路 径 ， 并 行 执行 后 的 文件 列表 如 图 3-28 
所 示 。 


Number Оп 类 型 处 理 状态 等 待 执行 时 间 用 户 名 报告 动作 Ж KB Performance file anne 


PAHXIE SAPLTHFB C:XusrVsapXIDSADVEBIGSOOXdataXATOO00086. DAT 
C:XusrXsapXIDSADVEBIGSOONdataXATOO0007. DAT 


o 
оо 


sO CO — Съ Сл н со о aad 


Ef 
等 待 


器 


3-28 并行 执行 后 的 文件 列表 
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3. Schedule 


可 以 对 一 个 用 户 一 段 时 期 内 的 所 有 动作 进行 分 析 ， 单 击 “Schedule” 按 钮 进入 设 定 界 
面 ， 后 台 记 录 条 件 列表 如 图 3-29 所 示 。 


АВАР 运行 时 间 分 析 : 初始 屏幕 


D ЕЛ 


En 


b [M 


= 


gue 


清单 中 没有 数据 
图 3-29 后 台 记 录 条 件 列表 
单 击 “创建 ”按钮 加 | 进入 用 户 和 时 间 段 限制 设 定 界面 ， 如 图 3-30 所 示 。 


Ге? Schedule Measurement 


Scheduling is automatically lost when the 


application server is closed. 


User 

Client 

External Session 
Process Category 
Object Type 
Object Name 


Max. No. of Sched. Measurements 


Expiration Date 


Expiration Time 


[3€ 


А] 


PAHXIE 

812 

0 

2 

т 

ZDSE16 
1! 


ge gs 


2012. 08. 06] 
_ [23:10:42 


在 设 定 输入 参数 和 结束 日 期 后 ， 凡 在 该 日 期 之 前 对 应 用 户 执 行 相 应 程序 将 被 记录 运行 


[E 


3-30 JH 


К ЖН] ЇН] BE BR 


li ЕЛІН 


时 


的 数据 。 该 功能 可 用 于 远程 跟踪 某 用 户 的 实际 使 用 情况 ， 通 过 测试 计划 ， 实 现 无 人 值守 自动 


化 性 能 追踪 ， 并 且 扩大 测试 范围 


详细 的 参数 说 明 如 下 。 


(ег; 所 要 记录 的 用 户 名 ， 即 执行 程序 的 用 户 名 。 

e Client: 执行 程序 所 在 的 客户 端 。 

€ External Session; ， 在 哪个 External Session 中 执行 的 程序 被 记录 数据 。1 表示 只 在 1 号 进 
程 执 行 的 程序 被 记录 数据 ， 而 其 他 的 进程 不 记录 ; 0 表示 所 有 的 都 记录 。 

* Process Category; 程序 类 型 ， 包 括 Dialog, Update, RFC 等 。 

ө Object Type; 对 象 类 型 ， 包括 Transaction, Report 和 Function Module 等 ， 与 以 下 介绍 
的 对 象 配 合 使 用 。 

* Object Name; 对 象 名 ， 具 体 事务 码 、 程 序 名 和 功能 函数 名 等 ， 与 上 面 的 Object Type 


配合 使 用 。 


e Мах. No. of Sched. Measurements; 再 次 统计 期 间 ， 该 程序 的 统计 结果 文件 数 ， 也 就 是 
在 SE30 第 一 屏 中 单 击 Other File 时 看 到 的 清单 中 的 文件 数 。 

e Expiration Date: 统计 结束 日 期 。 

Ф Expiration Time: 统计 结束 时 间 。 
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4. Mesurement Restriction 
通过 Mesurement Restriction 可 以 指定 自己 需要 评估 测 试 的 步骤 ， 单 击 按钮 国 切 换 到 SAP 
标准 变 式 ， 单 击 按钮 [ 辆 进入 用 户 变 式 。 单 击 “ 创 建 ”按钮 ， 进 入 如 图 3-31 所 示 的 界面 。 


Variant  |DEFAULT From User |PAHXIE 
Description 自 定 义 变 x 
P Program (Parts) ! (Parts) Statements , Duration/Type 
v] Within and below Particular Units 
RFC, Update 
Program (Parts) 
P |Program/gl. class/fct. group Local class Proc. | 


[ ЕЛЕ ЕҤ T] 
«ID «БІН 


| ° 4| LN = Е £ Е = =l ММ 
Essi EE ГЕ 


3-31 HAE Уақ "Program (Parts) ”标签 页 


ТЕ "Program (Parts) ”标签 页 中 可 以 定义 自己 需要 评估 的 对 象 ， 其 中 : 
e “Within and below” 复 选 框 : 记录 某 一 程序 或 由 其 调用 的 所 有 子 程序 的 运行 数据 。 
* "Particular Units” 复 选 框 : 当 程 序 某 些 特定 的 部 分 运行 时 才 会 被 记录 数据 ， 这 些 特 定 
的 部 分 包括 SET RUN TIME ANALYZER ON/OFF 语句 之 间 的 部 分 。 
“RFC，Update” 复 选 框 : RFC 以 及 Update 调用 的 程序 也 纳入 数据 记录 范围 ， 记 录 的 
结果 将 储存 在 单独 的 文件 中 ， 这 些 文件 同样 可 以 在 SE30 中 查看 。 
ө “Program (Parts) ” 复 选 框 : 在 可 输入 表格 中 ， 从 左 到 右 字段 依次 是 对 象 类 型 、 对 象 
名 称 、 本 地 类 对 象 、 过 程 类 型 和 过 程 名 。 

5. Statements 
通过 “Statements” 标签 页 可 以 选择 需要 统计 的 ABAP 步骤 ， X] ub 337 $8 比较 复杂 的 程 
序 进 行 性 能 追踪 时 ， 这 些 选 项 将 具有 很 大 作用 ， 具 体 如 图 3-32 所 示 。 

6. Пигабоп/ Туре 

“Duration/Type” 标签 页 用 于 对 程序 运行 时 间 的 长 短 和 文件 的 大 小 进行 限定 ， 如 图 3-33 
所 示 。 

e “Мах. size of file” 文 本 框 : 单个 文件 的 最 大 文件 大 小 。 

e "Maximum runtime” ЖЛЕ: 最 长 运行 时 间 ， 超 时 运行 将 被 终止 。 
Aggregation” : "Full" 单 选 按钮 一 一 所 有 的 同类 语句 如 同一 个 表 内 的 Select 汇总 为 
一 个 数据 显示 ; “Per Call Position” 单 选 按钮 一 一 程序 代码 中 同一 个 位 置 的 调用 汇总 
为 一 个 数据 显示 ; "None" БӘ 总 ， 所 有 数据 都 单独 显示 。 
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ннжеИЯяниня/ 7 


Modularization Units 一 Database accesses Data transfer 
[v] Methods [v] Open sQL EXPORT/IMPORT 
[v] Events (00) [v] Native SQL DATASET 
[v] Function Modules [v] Contexts 
[v] Subroutines 口 DB-evel ops 
Screen / [v] Programs/ Transactions/C Routines 
[v] Flow logic Generation/Loadng 
[v] Formatting for frontend [v] Generate LOAD 
[v] Modules 
[v] Message handling Miscellaneous 
[V] ASSIGN, PF-STATUS, SET LOCALE, ... 
| Internal tables МІ statistics 
CI Read Operations ОкетеНеуе! runtime adminstration 
C Change operations 
Es EU EI 


图 3-32 FE X Ü "Statements" 标签 页 


. Program (Parts) y Statements DTI TIT TE Duration/ Type 


Max. size of file 2, 000 KB 
Maximum runtime 1,800 Seconds 


@ Full 
O Per Call Position 
O None 


CI With memory use (if aggretation not used) 


3-33 HEX EZ "Duration/Type" 标签 页 


e “With memory use (if aggretation not used) ” 复 选 框 : "IIR HL ДАЛ НАЛ 
复 选 枉 ， 则 系统 会 记录 内 存 的 使 用 状况 并 且 在 结果 中 显示 出 来 。 注 意 ， 勾 选 此 复 选 杠 
将 对 系统 的 性 能 产生 负面 影响 。 
7. Performance Data File 
程序 运行 完毕 或 完成 既定 的 运行 场景 后 ， 可 以 进入 性 能 评估 文件 查看 界面 ， 如 图 3-34 
所 示 。 


67 


Performance Data File 一 


应 用 程序 [ZDSE16 
简短 描述 [SAP Standard Variant | 
测 里 日 其 12012. 08. 06|21:35:12 | 

не size in КВ 65! 


Evaluate ЕЯ Other File... ІН File Info... [f тр... | 


图 3-34 性 能 评估 文件 查看 界面 


e“Evaluate” 按 钮 : 查看 当前 分 析 的 结果 。 运 行 的 时 间 分 为 3 个 部 分 ， 分 别 是 АВАР 
(АВАР 代码 执行 的 时 间 ) 、 数 据 库 ( 读 写 数据 库 的 时 间 ) 和 R/3 系统 (R/3 平台 调 
度 进程 等 消耗 的 时 间 ) 。 

e "Other File” 按 钮 : 打开 所 有 系统 上 保存 的 运行 时 间 数 据 信 息 ， 经 过 选择 屏幕 后 
以 查看 或 者 删除 。 通 过 本 功能 可 以 得 到 前 几 次 测量 的 跟踪 文件 ， 但 是 注意 ， SE30 | 
跟踪 文件 在 8 天 后 将 被 自动 删除 。 另 外 ， 由 于 跟踪 文件 是 存储 在 用 户 所 登录 的 应 用 服 
务 器 上 的 ， 因 此 当 存 在 多 个 应 用 服务 器 时 ， 就 需要 知道 当前 登录 的 是 哪个 服务 器 。 

e “File Info” 按 钮 : 当前 运行 时 间 分 析 对 应 数据 文件 的 基本 信息 ， 包 括 “ 文 件 路 径 / 文 
FA” “创建 用 户 ” “执行 用 户 ” “操作 系 统 ” 和 “应 用 服务 器 ”等 。 

“ШИ” НӘН. 删除 此 次 分 析 结果 文件 。 

8. 命中 列表 

在 查看 运行 时 间 分 析 结 果 时 ， 如 果 单 击 左 上 角 的 “命中 列表 ”按钮 图 ， 则 将 进入 命中 


列表 查看 界面 ， 如 图 3-35 所 示 。 
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E 

| 列表 (L) 编辑 (E) 转 到 (6) 设置 (5) 系统 (Y) 帮助 (H) 

[€ sa Bi eee nme бәсе ge 

运行 时 间 分 析 评 估 : 命中 清单 
Allel] p PS] av | [98 s] ДЕ ] 
No. Gross|= Net|Gross (%)|Net (W)|Call 程序 名 
1|7,051,518 0 100.0 0.0 |Runtime analysis 
1|7,051, 428 866 100.0 0.0 |Call Transaction ZDSE16 БАРИ538Т 
1|7, 048, 794 2,267 100.0 0.0 |Program ZEDW DISPLAY DSO 
1|6, 997, 056 2,499 99.2 0.0 |Call Func. Z ZRS TABLE LIST CREATE ZEDW DISPLAY DSO 
1|6,951,727 2, 248 98.6 0.0 |Perform CHECK GENERATE REPORT SAPLZ ZRS 
1|6, 950, 296 2, 305 98.6 0.0 |Perform GENERATE МЕҰ SEL SAPLZ ZRS 
1|6, 221, 608 34 88.2 0.0 |Call Func. RS TABLE REPORT GENERATE SAPLZ ZRS 
1|6, 221, 574 180 88.2 0.0 |Perform GENERATE REPORT SAPLSETB 
1|5, 990, 833 264 85.0 0.0 |Call Func. RS DELETE PROGRAM SAPLSETB 
1|3, 917, 432 105 55.6 0.0 |Perform DELETE PROGRAM SAPLSEUZ 
2|3, 893, 829 |-|3, 893, 829 55.2 55.2 |Delete Report /1BCDWB/DB/BIC/AZHIERDSO00 SAPLSEUZ 
1|2, 009, 440 38 28.5 0.0 |Perform GET PROGRAM INCLUDES SAPLSEUZ 
1|2, 009, 402 211 28.5 0.0 |Perform GET INCLUDE SAPLSEU2 
1|2, 008, 674 1,506 28.5 0.0 |Call Func. RS GET ALL INCLUDES SAPLSEUZ 
1|1,882, 762 |-|1, 882, 762 26.7 26.7 |Fetch DO10INC SAPLSEDA 
1| 723,508 5, 306 10.3 0.1 |Submit Report /1ECDWB/DB/BIC/AZHIERDSO00 SAPLZ ZRS 
1 449,119 3, 588 6.4 0.1 |Іһрі. generation of /1BCDWE/DB/BIC/AZHIERDSO00 SAPLZ ZRS 
2| 264,618 16,574 3.8 0.2 |Program /1ECDWB/DB/BIC/AZHIERDSOO0 
1 164,140 24 2.3 0.0 |Perform GENERATE DYNPROS SAPLSETB 
1 164,116 94 2.3 0.0 |Call Func. RS GEN DATA BROWSER DYNPROS SAPLSETB 
1 164, 022 41 2S 0.0 |Perform P GENERATE FB TABDYNPROS SAPLSEUS 
+ 163, 550 23 2.3 0.0 |Perform P COMPL AND EXP DYNPRO PAIR SAPLSEUS 
2| 163,527 395 2.3 0.0 |Perform P COMPL AND EXP DYNPRO SAPLSEUS 
27| 116,936 «ЖУР ЕЛ 0.0 |Call Func. RS PROGNAME SPLIT SAPLSEDA 
15| 112,233 112,184 ДЕ 1.6 |Са11 M. CL OO INCLUDE NAMING-^IF OO CLASS INCL NAMING^GET MTDNAME BY INCLUDE|SAPLSEQO 

24 94, 833 |= 94, 833 1.3 1.3 |Generate Dynpro /1BCDWB/DB/BIC/AZHIERDSOO0 0101 SAPLSEUS 
1 68,374 |- 68, 374 1.0 1.0 |Fetch /BIC/AZHIERDSOO0 /1BCDWB/DB/BIC/AZHIERDSO00 
+ 34, 995 72 0.5 0.0 |Perform VIEV MAINTENANCE CALL SAPLZ ZRS 
2 34, 813 125 0.5 0.0 |Call Func. RS ACCESS PERMISSION SAPLZ ZRS 
2 33, 222 102 0.5 0.0 |Perform GET MODIFICATION MODE SAPLSEUQ 
2 33,179 |- 33, 179 0.5 0.5 |Generate Dynpro /1BCDWB/DB/BIC/AZHIERDSOO0 0111 SAPLSEUS 
> 33,064 55 0.5 0.0 |Са11 Func. CLMINT СЕТ MODIFICATION STATE SAPLSEUQ 
1 32, 960 75 0.5 0.0 |Са11 Func. CLMINT MODIFY MODIFIC STATE SAPLSEQO 
£ 30, 269 122 0.4 0.0 |Са11 M. CL EX WE MODASS-^IF EX WB MODASS"SUPPRESS SAPLSEQ1 
1 29, 385 |- 29, 385 0.4 0.4 |Select Single 5ХС IMPSWH CL EXIT MASTER----------------CP 
1 26,817 40 0.4 0.0 |Perform DELETE INDEX SAPLSEUZ 
1 26, 674 128 0.4 0.0 |Call Func. RS TREE OBJECT PLACEMENT SAPLSEUZ 
* 26,122 35 0.4 0.0 |Perform DELETE DYNPROS SAPLSEUZ 
1 23,010 134 0.3 0.0 |Perform AUSGEBEN SAPLSETB 


图 3-35 命中 列表 查看 界 下 


9. Hm & 技巧 
在 SE30 初始 化 界面 中 ,左上 角 有 一 个 按钮 [ES 提示 & 技 西 |， 单 击 此 按钮 则 进入 两 种 不 同 

的 АВАР 程序 处 理 方式 ， 如 图 3-36 所 示 。 

[ES 系统 (Y) #BBh(H) 


Т Sese Om 


Select ... Where vs. Select + Check 


© 测量 运行 时 间 || &e Global Variables 


57 C] АВАР Objects Performance Examples 
У CJ SQL Interface. 

ЦЕ) Select ... Where vs. Select + Check: 

B 

E) Select aggregates 


Select + Check statement 


Select with Where condition 


Е) Select with select list N YE 
е аар [Tope] ТЕ 
D C] Index and Buffer Support SELECT ж FROM SEOOK INTO SEOOK VÀ. SELECT * FROM SEOOK INTO SEOOK VÀ 
b. C] Array Operations (internal tables) CHECK: SEOOK WA-CARRID - ^LH' AND WHERE CARRID - ^LH' AND 
b. C] select over more than one table SEOOK VA-CONNID = '0400'. CONNID = '0400'. 
b Q context ENDSELECT. ENDSELECT. 
b O Internal Tables 
b C Typing 
> O T, Case, .... 
> С] Field Conversion 
b CJ Character/String Manipulation 
b C] АВАР Objects 
JPL J — BDD 
Ш1,001 Ln1-4 行 Ln4 Lil,Col in1-4 行 In4 


Documentation 

Always specify your conditions іп the Where-clause instead of 

checking them yourself with check-statements. 

The database system can then use an index (if possible) and the 

network load is considerahlv less. zl 


D 


不 同类 型 的 ABAP ТЕ ЖЕЛШ 


3-36 


通过 “测量 运行 时 间 ” 即 可 得 出 不 同 处 理 方式 之 间 的 性 能 差异 ， 以 便 在 后 续 的 BW 项 
目 中 尽量 使 用 SAP 推荐 的 方式 访问 和 处 理 数据 。 
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41 SAP 源 系统 数据 抽取 过 程 的 功能 增强 


由 于 在 实施 BW 数据 仓库 的 过 程 中 ， 大 部 分 的 数据 抽取 均 来 自 ERP 系统 ， 因 此 本 章 将 


对 ERP 源 系 统 的 抽取 过 程 以 及 相关 增强 和 个 性 化 进行 介绍 。 
在 ЕВР 源 系统 的 数据 抽取 过 程 中 ，SAP 提供 了 多 种 可 以 实现 数据 源 增强 和 个 性 化 数据 


源 制作 的 功能 ， 本 章 会 将 涉及 АВАР 代码 的 部 分 一 一 进行 讲解 。 以 下 是 SAP 提供 的 两 种 修 
改 或 增强 数据 源 数据 的 方法 。 

1. 用 户 出 口 (User Exit) 

用 户 出 口 是 一 些 由 SAP 提供 并 且 能 够 由 开发 人 员 进 行 修改 的 包含 在 标准 程序 中 的 一 段 
函数 (Function Module) ， 用 于 增强 SAP 系统 标准 功能 或 修改 相关 业务 对 象 的 数据 。 

2. 业务 对 象 接口 (Business Add — Ins) 

与 用 户 出 口 类 似 ， 业 务 对 象 接口 源 于 АВАР 00 技术 ， 它 也 是 由 SAP 提供 并 且 能 够 由 开 
发 人 员 进 行 个 性 化 代码 编写 的 接口 ， 用 于 增强 SAP 系统 标准 功能 或 修改 相关 业务 对 象 的 
数据 。 

在 本 章 的 后 半 部 分 ， 将 对 使 用 ЗАР 自 带 BTE 进行 带 增 量 处 理 的 一 般 数 据 源 的 制作 进行 
探讨 ， 因 为 这 其 中 也 会 涉及 很 多 ABAP 代码 的 处 理 。 


4.1 一 般 数 据 源 的 制作 


4.1.1 应 用 场景 描述 


用 户 希 望 每 天 都 保留 晚上 24 点 的 库存 数据 历史 ,包括 库存 数量 以 及 库存 金额 ， 以 追踪 
库存 的 变化 情况 。 同 时 ， 用 户 也 需要 ERP 系统 中 财务 人 员 每 天 维护 的 汇率 ， 将 库存 金额 转 
换 到 本 位 币 进行 余额 比较 。 通 过 系统 检查 可 以 发 现 ，SAP 系统 本 身 并 没有 期 末 库 存 相 关 的 数 
据 源 ， 也 没有 与 汇率 相关 的 数据 源 。 


4.1.2 一 般 数 据 源 创 建 准 备 工 作 


SAP ЕВР 系统 或 SAP CRM 系统 等 在 标准 的 Business Content 中 都 提供 了 丰富 的 数据 
源 ， 只 需要 用 户 激活 即 可 使 用 ， 但 是 在 少数 情况 下 ， 标 准 的 数据 源 要 么 不 能 完全 满足 要 
求 ， 要 么 没有 相关 的 数据 源 ， 此 时 就 需要 使 用 ЗАР 自 带 的 一 般 数据 源 制作 工具 进行 数据 
源 的 制作 。 

ЖЕ ЕВР 源 系统 中 ， 用 户 能 够 通过 调用 事务 码 RSO2 对 一 般 数据 源 进行 创建 、 修 改 和 查 
看 等 操作 。 通 过 该 事务 码 ， 能 够 对 交易 数据 、 主 数据 属性 、 主 数据 文本 进行 相关 数据 源 的 开 
发 。 可 惜 的 是 ，SAP 并 未 提供 标准 工具 对 层次 结构 的 数据 源 进行 开发 ， 因 此 只 能 通过 标准 的 
层次 结构 数据 源 ， 或 文件 上 载 的 方式 实现 。 

一 般 数 据 源 有 多 种 创建 方式 ， 但 是 用 的 最 多 的 是 根据 “视图 / 表 ” 进 行 数据 源 的 创建 ; 
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另外 一 种 是 根据 “功能 模块 ”进行 创建 。 根 据 “ 视 图 / 表 ” 创 建 的 数据 源 只 能 按照 数据 库 表 


的 内 容 全 量 或 增 量 方式 读 取 数 据 ， 并 且 要 求 包 括 单位 字段 在 内 的 所 有 字段 都 必须 存在 于 指定 
的 视图 或 表 中 ， 因 此 存在 某 些 局 限 。 而 根据 功能 模块 创建 的 数据 源 ， 包 括 抽取 结构 、 抽 取 过 
程 和 处 理 逻 辑 都 是 用 户 自 己 定义 的 ， 因 此 具有 较 大 的 灵活 性 。 在 大 型 的 BW 项 目 实施 中 ， 建 
议 更 多 地 使 用 “功能 模块 ”进行 数据 源 的 创建 。 

在 实施 BW 数据 仓库 项 目 之 前 ， 首 先 要 在 ERP 源 系统 后 台 的 SBIW 菜单 中 做 一 些 初始 设 
置 ， 如 激活 标准 数据 源 等 ， 其 中 有 一 项 很 重要 的 工作 是 “传输 应 用 程序 组 件 层 次 结构 ” АП 


图 4-1 所 示 。 


“Ру; 数据 传输 到 5AP 业 务 信息 仓库 
В 一 般 设 置 
“Ву ЧЕНЕЙ 


В (@ 传输 业务 目录 数据 源 
用 于 特定 应 用 程序 数据 新 的 设置 (PI 基础 ) 
用 于 特定 应 用 程序 数据 源 的 设置 (PI) 
一 般 数 据 源 
数据 源 的 后 处 理 


ERP 系统 中 的 应 


j 程 序 组 件 传 输 


因此 ， 在 新 建 数据 源 之 前 ， 最 好 先 新 建 自己 的 应 用 程序 组 件 ， 以 便 按 文件 夹 的 方式 组 织 
将 要 新 建 的 数据 源 。 输 入 事务 码 RSA6， 或 在 SBIW 中 按照 “数据 传输 到 SAP 业务 信息 仓 
库 ” 一 “数据 源 的 后 处 理 ” 一 “编辑 数据 源 和 应 用 程序 组 件 层次 ”菜单 路 径 进 入 应 用 组 件 
层次 结构 的 编辑 界面 ， 如 图 4-2 所 示 。 


€ ін Cee AR nenas HA Өш 


后 处 理 数据 源 和 层次 结构 
ATEA АСЮ е 1288 8 чен (Ы mms] mamo | SS 
E 
SAP iul 
[= SAP-R/S SAP 应 用 程序 组 件 
® 0 P 国际 开发 
Fm IS SAP 工业 
Œ ONDI SAP 组 件 
[—2 OADD SAP SYSTEMS ЕШ SaP 系统 
[——® NEY_HTER_ROOT 
80 OB RFID RFID 数据 源 
ГВ ORT ВА] 零售 方式 
[E 9AII BV DATASOURCES 根 节 点 自动 标识 基础 设施 
® FS ROOT 应 用 程序 比较 : 财务 服务 层次 结构 
[= APCO-COVMIC 
[Œ APCO-DI 长 自动 物料 数 
[E ERC ROOT 申请 公司 层次 结构 电子 招 了 
m FI-CA FI-CÀ 


ROOT 
Fm GLTRADE ROOT 
[——® GRC-RM 


应 用 程序 组 件 层次 结构 -全 球 贸易 管理 


| 


[8 HCM ROOT 应 用 程序 组 件 层次 结构 HCK 企业 附加 ) 
Fm OIS HER 
Fm ROOT 
= ISF 
[ 8 IS IS ROOT INSURANCE 
® 015 НЕ 
= 015-ТЕ 远程 通读 
[-8 ors_uc 公共 事业 公司 
[——@ APCO-IS AUTOMOTIVE 
® JVA-ROOT 
[-8 015 OIL 石油 和 煤气 
[——® PI BASIS РІ 基础 
[E REFX RO 灵活 的 不 动产 管理 应 用 程序 组 件 层次 结构 
[E BW TECH Bv: 技术 组 件 
г O0SLL SAP 全 球 贸易 服务 
加 IS-BEV 
[= IS-BEV-EN IS 饮料 空 箱 
[E IS-BEV-SR 15 饮料 销售 退货 
[—® RTLVFM 
[—8 БЕР VFIL EXTRACTION Б! 
[run I гр] 


RSA6 [8] 0138 | OVR 


图 4-2 应 用 程序 层次 结构 的 编辑 界面 


单 击 SAP - R/3 左边 的 扩展 按钮 国 ， 展 开 ЕВР 中 标准 的 应 用 程序 组 件 树 形 结构 ， 将 鼠 
标 放 置 在 SAP - R/3 上 ， 然 后 单 击 界面 上 方 的 “新 建 ”按钮 器， 新 建 自 己 的 应 用 程序 结构 ， 
如 “DEMO -用 户 自 定义 ”， 如 图 4-3 所 示 。 
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SAP 
SAP-R/3 
ГЕМО 


图 4-3 新 建 用 户 自 定 义 应 用 组 件 DEMO 


然后 单 击 “ 保 在” 按钮 ， 保 存 新 的 应 用 组 件 层次 结构 。 下 面 将 进行 一 般 数据 源 的 创建 
dps 


4.1.3 通过 功能 模块 进行 数据 源 的 开发 

本 节 将 基于 SAP 库存 标准 透明 表 MBEW 的 内 容 ， 以 新 建 数据 源 ZDS_DEMO_MBEW 为 
例 讲 解 基于 功能 模块 的 数据 源 的 制作 方法 ， 有 具体 步 又 如 下 。 

第 1 步 : 在 定义 基于 功能 模块 的 数据 源 之 前 ， 首 先 需 要 定义 该 数据 源 的 输出 结构 ， 如 需 
要 抽取 MBEW 的 部 分 数据 ， 需 要 定义 一 个 技术 名 称 为 ZDS_DEMO_JG_MBEW 的 结构 ， 结 构 
中 包含 了 所 需要 的 信息 ， 数 据 结构 如 图 4-4 所 示 。 


ін eee CHR тын x Өт 


字典 : 维护 结构 
ЕЕ] PER аже EE T WEE 
结构 (ZDS DEMO JG MEEW | 激活 
短文 本 |MBEW/ 抽 取 结 构 
BELL ШЕ ССС жз | | ( 
қатшы SiS 17] кшт noe | 1/7 
| ЕТУ... 
| m TUNE CHAR 4 0 评估 范围 
C МАТНЕ CHAR 18 0 物料 号 
Г] BWTAR D CHAR 10 0 评估 类 型 
Г] LEKUM QUAM 13 3 总 计 已 估计 库存 
Г] MEINS UNIT 3 0 基本 计量 单位 
口 SALK3 CURR 13 2 估价 的 总 库存 价值 
Г] WAERS CUKY 5 0 货币 码 
口 


ра 


L 
„Б 


数据 源 ZDS_DEMO_MBEW 对 应 的 数据 结构 


此 处 定义 的 结构 就 是 数据 源 ZDS_DEMO_MBEW 对 外 输出 的 表 字 段 内 容 。 结 构 定 义 完毕 
后 ， 可 以 使 用 T - Code RSO2 进行 数据 源 的 定义 。 

第 2 步 : 定义 抽取 数据 的 逻辑 函数 功能 模块 ， 新 建 国 数组 ZDS_DEMO ， 并 在 函数 组 的 
抬头 部 分 加 入 以 下 代码 段 : 
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ж KEJE 
FUNCTION - POOL zds. demo. " MESSAGE -ID .. 


ж Interface parameters to Service АРІ 
TYPE - POOLS: sbiwa, rsap, srsc. 


TYPE - POOLS; rsaot , rsazt , slis. 

* Define Log write 

DATA: rsal save, subrc LIKE sy - subrc, 
rsal s logparms LIKE rslogparms. 


DEFINE log write. 

rsal, save, subrc = sy - subrc. 

rsal s logparms — msgty - &l. 

rsal s logparms - msgid = &2. 

rsal s logparms — msgno = &3. 

rsal s logparms - msgvl = &4. 

rsal s logparms - msgv2 = 45. 

call function RSAL LOG. WRITE 

exporting 

i msgty = rsal s logparms — msgty 
i msgid 2 rsal s logparms — msgid 
i msgno = rsal s logparms - msgno 
i msgvl -тва! s logparms — msgvl 
i msgv2 -тва! s logparms - msgv2. 

ву - subrc = rsal, save subrc. 


END - OF - DEFINITION. 


数据 源 对 应 功能 函数 的 输入 接口 设置 如 图 4-5 所 示 ， 表 设置 如 图 4-6 所 示 , 例外 设置 
如 图 4-7 所 示 。 


Function Builder: Change ZDS_DEMO_FM_MBEW 


%@ с-.нсеепив етін ЕЖ em 


SRSC S IF SIMPLE-REQUNR 
SRSC S IF SIMPLE-DSOURCE 
SRSC, S IF SIMPLE-MAXSI ZE 
SRSC S IF. SIMPLE-INITFLAG 
SRSC S IF SIMPLE-READONLY 


44-5 数据 源 对 应 功能 函数 的 输入 接口 
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Function Builder: Change 705 DEMO FM MBEW 


9 н еее бав nini (ЕЖ eim 


Function Builder: Change 705 DEMO FM MBEW 


B ESI | rM 5) [— [P 
10 ІШІ (ЕЛ [| Ев) ә | E n 


Function module ZDS DEMO FN MBEW Active 


YPE SRSC S IF SIMPLE-T SE 
TYPE SRSC S IF SIMPLE-T Fl 


LIKE ZDS DEMO JG MBEW MBEW 抽 取 结 构 


图 4-6 数据 源 对 应 功能 函数 的 表 


Function Builder: Change ZDS_DEMO_FM_MBEW 
eee эш ж тті [Ж [|] ӨШ 


Function Builder: Change 2705 DEMO FM MBEW 


Function module |706 DEMO FM MBEW Active 


MORE DATA 
ERROR PASSED TO MESS HANDLER | 


44-7 数据 源 对 应 功能 函数 的 例外 


* 通过 功能 模块 制作 数据 源 
FUNCTION zds. demo. fm. mbew. 


ж. 


x" x "Local interface: 


ж" IMPORTING 


ж" VALUE(I REQUNR) ТҮРЕ SRSC 5 IF SIMPLE - REQUNR OPTIONAL 
ж VALUE(I DSOURCE) ТҮРЕ SRSC 5 IF SIMPLE – DSOURCE OPTIONAL 
ж" VALUE(I MAXSIZE) ТҮРЕ SRSC S IF SIMPLE - MAXSIZE OPTIONAL 
ж" VALUE(I INITFLAG) ТҮРЕ  SRSC S IF SIMPLE - INITFLAG OPTIONAL 
ж" VALUE(I READ ONLY) ТҮРЕ SRSC 5 IF SIMPLE - READONLY OPTIONAL 
ж" TABLES 

ж" I T SELECT ТҮРЕ SRSC 5 IF SIMPLE - T SELECT OPTIONAL 

ж" I T FIELDS ТҮРЕ SRSC 5 IF SIMPLE - T FIELDS OPTIONAL 

ж" E Т DATA STRUCTURE 2705 DEMO JG MBEW OPTIONAL 

ж" EXCEPTIONS 

ж NO MORE DATA 

ж ERROR PASSED TO MESS HANDLER 
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TABLES; mbew. "工厂 评估 库存 


DATA: lt data TYPE TABLE OF 245 demo jg трем. 
DATA: wa data LIKE LINE OF e t data. 


* Auxiliary Selection criteria structure 


DATA: | s select TYPE srsc. s, select. 


* Maximum number of lines for DB table 


STATICS; s s if TYPE srsc. s if simple, 


* counter 


8 counter datapakid LIKE sy — tabix , 


* cursor 


s cursor TYPE cursor. 


* Select ranges 
RANGES: | г шаг FOR zds, demo jg mbew - matnr, "物料 
1 г bwkey FOR zds, demo jg mbew - bwkey, "工厂 
1 г bwtar FOR zds demo, jg, mbew - bwtar. "评估 类 型 


ж [nitialization mode( first call by SAPI) or data transfer mode 


* (following calls) ? 


IF i initflag = sbiwa с flag on. 


жок жок ЖоК оК: Ж ЖЖ ЖК о о Ж ЖК ЖЖЖ: ЖЕ ааа ааа аа тата ЖК ЖоК а ааа 
ж Initialization; check input parameters 
* buffer input parameters 


* prepare data selection 


LLELLLLLLLLLLLLLLLLLLELLLLLLLLLLLLLLLLLLLLELLLLLLLLLLLLLLLLLLLLLLLLLELE E 


* Check DataSource validity 
CASE і dsource. 
WHEN ZDS DEMO MBEW . 
WHEN OTHERS. 
IF 1 22. MESSAGE е009(13). ENDIF. 


* this is a typical log call. Please write every error message like this 


log write E " message type 
"R3 " message class 
' 009 " message number 
i dsource " message variable 1 


Pr 


"message variable 2 
RAISE error_passed_to_mess_handler. 
ENDCASE. 


APPEND LINES OF i t select TO s s if ~ t. select. 
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ж Fill parameter buffer for data extraction calls 


ѕ s if — requnr ті requnr. 
в s, if — dsource ті dsource. 
S s if — maxsize = 1 maxsize. 


ж ЕШ field list table for an optimized select statement 
ж (in case that there is no 1:1 relation between InfoSource fields 
* and database table fields this may be far from beeing trivial) 


APPEND LINES OF i t fields TO s s if — t. fields. 
ELSE. " [nitialization mode or data extraction ? 


soot se sj esie e tesi e oF ote F šE ЭК ook оК šE Ж ЭК оК te oj dede oj de sje se seo oE 9 soot se ok КК КК ЖоК sedeo sete 9 ok E ete ТІЗЕ 
* Data transfer; First Call OPEN CURSOR + FETCH 
* Following Calls FETCH only 


ЖЖЖ Ж ЖЖЖ ЖЖ ЖЖ ЖЖЖ Ж ЖЖЖ ЖЖЖ ЖЖЖ ЖЖ ЖЕЖ 


ж First data package - > OPEN CURSOR 
IF s counter. datapakid = 0. 
* Fill range tables BW will only pass down simple selection criteria 
ж of the type SIGN = I and OPTION = EQ or OPTION = ВТ. 
* 物料 
LOOP AT s s if - t select INTO 1. s select WHERE fieldnm = MATNR ." 
MOVE - CORRESPONDING 1 s select TO 1 г matnr. 
APPEND Іт matnr. 
ENDLOOP. 
ж 评估 范围 /工厂 
LOOP AT s s if- t select INTO 1l. s select WHERE fieldnm = BWKEY . 
MOVE - CORRESPONDING 1, s. select TO 1 г bwkey. 
APPEND 1 r bwkey. 
ENDLOOP. 
* 评 佑 类 型 
LOOP AT s s if - t select INTO 1. s, select WHERE fieldnm = BWTAR . 
MOVE - CORRESPONDING 1 s select TO 1 г bwtar. 
APPEND 1 r bwtar. 
ENDLOOP. 


* Determine number of database records to be read per FETCH statement 


ж from input parameter I MAXSIZE. If there is a one to one relation 
* between DataSource table lines and database entries, this is trivial. 
* [n other cases, it may be impossible and some estimated value has to 


ж be determined. екро ~ bukrs 


OPEN CURSOR WITH HOLD s. cursor FOR 
SELECT ж 
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FROM mbew 


WHERE bwkey IN 1 r bwkey "PC 
AND matnr IN 1 г matnr "物料 
AND bwtar ІМІ т. bwtar. "评估 类 型 
ENDIF. " First data package ? 


FETCH NEXT CURSOR s. cursor 
APPENDING CORRESPONDING FIELDS 


OF TABLE lt. data 
PACKAGE SIZE s s if ~ maxsize. 


LOOP AT It. data INTO ма data . 
APPEND ма data TO e t. data. 
CLEAR wa. data. 

ENDLOOP. 


IF sy - subre < >0. 
CLOSE CURSOR s. cursor. 
RAISE no. more. data. 
ENDIF. 


s counter datapakid = s counter, datapakid + 1. 


ENDIF. " [nitialization mode or data extraction ? 


ENDFUNCTION. 
第 3 步 : 调用 事务 码 RSO2 ( 见 图 3-4) ， 必 须 先 选择 需要 新 建 数据 源 的 类 型 ， 并 且 指 定 
一 个 数据 源 的 技术 名 称 。 这 里 创建 一 个 交易 数据 源 ， 并 且 命 名 为 ZDS_DEMO_MBEW， 如 
图 4-8 所 示 。 


"ав eee Sma жеге ma Өт 


维护 一 般 数 据 源 
а 


数据 源 
@ 业 务 数据 (ZDS DEMO MBEW - 
O 主 数据 属性 


O3 Ен 
| 


Га: ТТТ [exem | 


图 4-8 新 建 数据 源 ZDS_DEMO_MBEW 


E 


需要 说 明 的 是 ， 如 果 是 在 项 目 中 ， 则 必须 按照 项 目 组 的 统一 要 求 进行 命名 ， 而 不 能 随意 


地 给 出 一 个 名 字 ， 其 次 最 好 在 数据 源 中 间 加 上 数据 表 或 视图 的 信息 。 例 如 ， 本 数据 源 中 ， 用 
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户 可 以 将 MBEW 数据 表 加 入 到 数据 源 的 名 称 中 ， 这 样 以 便 在 众多 的 数据 源 中 轻松 地 发 现 自 
己 所 新 建 的 数据 源 。 

Жа. 输入 数据 源 名 称 后 ， 单 击 “创建 ”按钮 ， 系 统 会 进入 数据 源 详细 设计 界面 ， 
必须 选择 数据 源 将 会 出 现在 哪 一 个 应 用 组 件 层次 节点 (也 就 是 之 前 新 建 的 DEMO 组 件 ) ， 以 
及 数据 源 是 哪 一 种 数据 获取 类 型 ， 一 共有 3 种 类 型 可 选 ， 分 别 是 从 视图 中 提取 、 从 查询 中 提 
取 和 从 功能 模块 中 提取 ， 如 图 4-9 所 示 。 

这 里 选择 从 功能 模块 中 提取 (中 文 翻译 为 按 财务 管理 提取 ， 
实际 上 此 处 的 FM 是 功能 模块 Function Module 的 意思 ， 可 能 当初 
的 翻译 人 员 理解 为 财务 管理 了 ) 。 由 于 在 实际 项 目 中 ， 从 信息 查 m | 
询 中 获取 数据 使 用 的 相对 较 少 ， 因 此 本 书 只 对 第 1 种 和 第 3 种 进 84-9 数据 源 的 3 种 类型 
行 了 描述 ,详细 的 技术 资料 ， 读 者 也 可 以 参考 SAP 官方 提供 的 帮助 文档 。 

第 5 步 ， 选择 数据 源 做 好 后 存放 的 应 用 组 件 层次 节点 ， 因 为 之 前 创建 了 名 为 DEMO 的 
节点 ， 因 此 将 新 建 的 数据 源 放 到 DEMO 节点 下 。 

第 6 步 ; 在 选 定 了 应 用 组 件 层次 节点 DEMO 后 ， 将 数据 源 的 名 称 、 数 据 源 的 提取 结构 、 
数据 源 的 功能 模块 填 和 人 到 指定 的 输入 框 内 ， 如 图 4-10 所 示 。 


е "чв eee CHR аъла ЕМ om 
事务 数据 的 创建 数据 源 : 205 DEMO MBEW 
一 般 Delta 
数据 源 ZDS DEMO MBEW 从 视图 中 提取 
应 用 程序 组 件 DEMO 从 查询 中 提取 
调整 
НБ 新 
ез 
简要 描述 | 当前 库存 提取 
中 间 的 说 明 | 当前 库存 提取 
长 文本 描述 | 当前 库存 提取 
从 DB 视图 中 提取 
视图 / 表 
提取 结构 
从 SAP 查询 中 提取 
信息 集 B 
ELI н 
功能 模块 |ZDS DEMO FI MBEW 
提取 结构 |ZDS DEMO JG MBEW 


图 4-10 新 建 数据 源 的 参数 


第 7 步 : 单 击 “ 保 存 ” 按 钮 保存 数据 源 ， 系 统 进 入 数据 源 配置 界面 ， 在 该 界面 可 以 
对 “选择 字段 ”和 “隐藏 字段 ”进行 勾 选 指定 。 在 本 例 中 ， 选 择 评估 范围 (BWKEY) 、 物 
料 号 (MATNR) 和 评估 类 型 (BWTAR) 作为 数据 源 的 数据 抽取 选择 条 件 字段 ， 如 图 4-11 
所 示 。 
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数据 源 : 用 户 版 本 编辑 
i 7 WE 


数据 源 : 用 户 版 本 编辑 


m" ZDS DEMO БЕУ 开发 类 
描述 当前 库存 提取 
(ZDS DEMO JG ИВЕ | 
直接 访问 [1 | 
Delta 更 新 Г] 用 于 调整 的 数据 源 Г] 


БҮКЕҮ 评估 范围 口 口 П 4 
NATNR не | [dw | [| I |! 
BVTAR 评估 类 型 | Em a | [ш 
LBKUM 总 计 已 估计 库存 ІШ ow y i | ШЕ 
MEINS 基本 计 里 单位 Кш qw m [ш 
SALK3 价 的 总 库存 价值 tm qw mm Jm 
WAERS 币 码 ПЕТ ІНЕН | БЕН БЕН ШЕ ІТ ШЕН ШЕГІ 


图 4-11 新 建 数 据 源 的 选择 字段 

第 8 步 : 单 击 “ 保 存 ” 按 钮 保存 数据 源 (由 于 通过 功能 模块 抽取 的 数据 源 的 数据 选择 
在 АВАР 代码 内 实现 ， 因 此 本 处 没有 设置 数据 源 的 增 量 机 制 ， 读 者 也 可 以 通过 上 次 请 求 的 时 
间 等 方式 进行 增 量 机 制 的 处 理 ) 。 
4.1.4 通过 表 和 视图 进行 数据 源 的 开发 

本 节 将 通过 建立 货币 汇率 数据 源 的 例子 ， 为 后 续 的 数据 源 增强 做 好 基础 准备 工作 ， 建 立 
步骤 具体 如 下 。 

第 1 步 : 调用 事务 码 RSO2 ( 见 图 3-4)， 必 须 先 选 择 需要 新 建 数 据 源 的 类 型 ， 并 且 指 定 


一 个 数据 源 的 技术 名 称 。 这 里 创建 一 个 交易 数据 源 ， 并 且 命 名 为 ZDS_DEMO_TCURR ZH 
图 4-12 所 示 。 


维护 一 般 数据 源 


J C00 мї ғ” 


维护 一 般 数据 源 


OLF ZDS DEMO TCURR 


O 主 数据 属性 
O 〇 文本 


4-12 ”新建 数 据 源 ZDS_DEMO_TCURR 
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第 2 步 : 输入 数据 源 名 称 后 ， 单 击 “创建 ”按钮 ， 系 统 会 
进入 数据 源 详 细 设计 界面 ， 必 须 选 择 数据 源 将 会 出 现在 哪 一 个 
应 用 组 件 层次 节点 ， 以 及 数据 源 是 哪 一 种 数据 获取 类 型 。 一 共 
有 3 种 类 型 可 选 ， 分 别 是 从 视图 中 提取 、 从 查询 中 提取 和 从 功 жаз 数据 源 的 数据 
能 模块 中 提取 ， 如 图 4-13 所 示 。 这 里 选择 第 1 种 ， 从 视图 中 获取 类 型 
提取 数据 

第 3 p. 选择 数据 源 做 好 后 存放 的 应 用 组 件 层次 节点 ， 因 为 之 前 创建 了 名 为 DEMO 的 
节点 ， 因 此 将 新 建 的 数据 源 放 到 DEMO 节点 下 。 

第 4 J. 在 选 定 了 应 用 组 件 层 次 节点 DEMO 后 ， 将 表 TCURR 填 和 人 到 对 应 的 输入 框 中 ， 
如 图 4-14 所 示 。 


e “ов еее CAR атон ЕР om 
事务 数据 的 创建 数据 源 : 705 DEMO TCURR 


数据 源 ZDS DEMO TCURR 从 视图 中 提取 


应 用 程序 组 件 ГЕМО 
调整 
对 象 状态 _ 新 
XE 2 
| mess O O č (s xm 
中 间 的 说 明 Dux: _ 


长 文本 描述 | 货币 汇率 抽取 


从 DB 视图 中 提取 一 
2: TCURR | 
Lr MEN 


M SAP 查询 中 提取 
E MEN. | 


Еи 
功能 模块 | | 
提取 结构 | 


4-14 新 建 数 据 源 的 参数 


第 5 步 : 单 击 “保存 ”按钮 保存 数据 源 ， 系 统 进 入 数据 源 配置 界面 ， 在 该 界面 可 以 对 
“选择 字段 ”和 “隐藏 字段 ”进行 匀 选 指定 。 在 本 例 中 ， 选 择 汇率 类 型 (KURST) 、 从 货 
(FCURR) 、 最 终 货 币 (TCURR) 和 汇率 有 效 起 始 日 期 (GDATU) 作为 数据 源 的 数据 抽取 选 
择 条 件 字段 ， 如 图 4-15 所 示 。 
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е - 4H eee сив г-ге MA Өт 
数据 源 . 用 户 版 本 编辑 


ЕСЕСІ ЖИ 
数据 源 ZDS DEMO TCURR 开发 类 {ТИР 
Lud 货币 汇率 抽取 
| 提取 
提取 结构 ZOXID30135 
直接 访问 1 
Delta 更 新 用 于 调整 的 数据 源 
字段 名 短文 本 选择 隐藏 字段 ға (МЕР. ГЇ 
KURST 汇率 类 型 v P 
FCURR 从 货币 = = 
TCURR 最 终 货 币 v 
GDATU 汇率 有 效 起 始 日 期 М 
UKURS 汇率 
FFACT 来 自 货币 单位 的 比率 [] 口 
TFACT 到 ”货币 单位 汇率 


图 4-15 选择 数据 源 过 小 条 件 字段 


第 6 步 : 单 击 “ 保 存 ” 按 钮 保存 数据 源 。 

至 此 ， 基 本 上 数据 源 就 制作 完毕 了 ， 此 时 可 以 使 用 数据 源 抽取 测试 工具 RSA3 对 数据 源 
进行 抽取 测试 和 测试 数据 的 初步 查看 。 但 是 可 以 看 到 ， 抽 取 到 的 数据 不 太 符合 用 户 的 要 求 ， 
抽取 到 BW 系统 的 数据 并 不 符合 预期 。 一 方面 ， 有 效 时间 数 据 变 成 像 80009688 这 样 的 时 间 
点 ; 另 一 方面 ， 比 率 (从 ) 字段 和 比率 (Ф|) 字段 没有 包含 任何 的 数据 ， 因 此 需要 在 下 面 
的 章节 中 讨论 ， 如 何在 数据 的 抽取 过 程 中 进行 数据 源 的 增强 。 

需要 说 明 的 是 ， 本 例 并 没有 对 数据 源 进行 增 量 机 制 的 设 定 ， 在 制作 数据 源 的 过 程 中 ， 可 
以 通过 制订 某 一 个 一 直上 升 的 对 象 ， 如 日 历 天 ， 作 为 增 量 机 制 的 判断 条 件 ， 这 样 制作 出 的 数 
据 源 就 能 进行 增 量 抽取 了 。 详 细 的 设 定 方式 请 读者 参考 SAP 官方 提供 的 帮助 文档 或 SAP 官 
Ji SCN 论坛 。 

4.1.5 单元 小 结 

一 般 数据 源 使 得 用 户 能 够 通过 SAP 提供 的 工具 制作 出 那些 用 户 需要 ， 但 是 在 标准 的 业 
务 目 录 中 又 不 存在 的 数据 源 。 但 是 ， 在 实际 的 使 用 过 程 中 ， 用 户 必 须 先 确定 确实 没有 相关 的 
标准 数据 源 ， 才 能 进行 一 般 数据 源 的 创建 ， 因 为 重复 创建 的 数据 源 不 仅 在 系统 运 维 上 会 增加 
额外 的 工作 量 ， 而 且 在 框架 设计 和 运行 性 能 上 也 不 见得 有 标准 数据 源 那 么 完善 。 


4.2 对 数据 源 的 增强 处 理 


4.2.1 应 用 场景 描述 


只 有 在 SAP 业务 目录 标准 数据 源 或 自 定义 数据 源 的 字段 不 能 完全 满足 需要 ,或 缺少 菏 
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些 特殊 功能 的 时 候 ， 才 会 使 用 数据 源 的 增强 ， 如 需要 对 字段 进行 联合 检查 以 对 数据 进行 初步 
的 清洗 。 
通常 用 户 会 面临 两 种 情况 ， 第 一 种 情况 是 SAP 提供 了 标准 的 数据 源 ， 但 是 标准 的 数据 
源 本 身 并 不 能 提供 充分 的 信息 ， 如 缺少 某 些 需要 的 字段 ; 第 二 种 情况 是 标准 的 业务 目录 中 不 
存在 相关 的 数据 源 ， 如 汇率 信息 就 没有 标准 的 数据 源 。 如 果 是 后 一 种 情况 ， 则 需要 进行 自 定 
义 数 据 源 的 开发 ， 在 少数 情况 下 ， 甚 至 需要 进行 基于 功能 模块 的 数据 源 的 开发 ， 以 满足 特殊 
的 需要 。 

以 下 是 几 种 常见 的 数据 源 增强 的 场景 。 

1. 需要 对 数据 源 增加 一 个 字段 

某 些 时 候 ， 标 准 的 SAP 数据 源 并 不 能 提供 用 户 所 需要 的 所 有 字段 ， 如 销售 订单 行 项 目 
数据 源 ， 用 户 可 能 希望 将 相关 抬头 的 信息 增强 到 数据 源 中 ,或 在 销售 开票 行 项 目 中 加 上 销售 
订单 的 相关 信息 。 

2. 需要 对 整 行 的 数据 进行 处 理 

男 外 一 些 时 候 ， 可 能 需要 按照 用 户 的 样式 设 定数 据 的 传输 ， 如 将 标准 数据 源 抽取 到 的 数 
据 分 为 两 条 或 多 条 独立 的 数据 。 

3. 权限 检查 

还 有 些 时 候 ， 可 能 希望 对 数据 抽取 加 上 某 些 检查 条 件 ， 如 对 于 会 计数 据 的 抽取 ， 用 户 希 
望 发 生 在 会 计 期 间 结束 之 后 ， 且 保证 数据 抽取 之 后 BW 系统 反映 出 真实 的 报表 情况 。 


4.2.2 使 用 用 户 出口 RSAP0001 


所 有 SAP 系统 提供 的 标准 数据 源 和 自 定义 的 一 般 数 据 源 都 能 够 通过 用 户 出 口 RSAPOO01 
实现 扩展 和 增强 。SAP 系统 数据 抽取 过 程 是 先 按照 既定 的 逻辑 从 ERP 系统 中 获取 数据 ， 然 
后 将 所 有 符合 条 件 的 数据 进行 分 包 处 理 ， 以 便 用 户 能 够 在 用 户 出 口中 对 每 包 数 据 进行 逐条 的 
处 理 。 这 就 意味 着 ， 用 户 不 仅 可 以 处 理 一 条 数据 中 的 某 个 字段 ， 也 能 对 整 包 数 据 进 行 插入 、 
删除 和 修改 操作 。 这 样 的 操作 虽然 也 可 以 在 BW 系统 中 转换 的 开始 例 程 完成 ， 但 是 传输 不 必 
要 的 数据 到 BW 系统 对 于 系统 和 网 络 资源 也 是 一 种 浪费 。 

在 项 目 中 用 户 通常 会 遇 到 这 样 的 问题 ， 实 现 既 定 的 目标 ， 到 底 是 在 ЕВР 系统 中 实现 好 ， 
还 是 在 BW 系统 中 实现 好 。 通 常情 况 下 ， 看 起 来 逻辑 可 以 在 这 里 实现 ， 也 可 以 在 那里 实现 ， 
以 下 就 是 一 些 示例 说 明 哪些 因素 应 当 在 做 决定 时 考虑 在 内 。 

1. 对 于 字段 的 扩展 
通常 来 说 ， 对 于 需要 增加 的 字段 的 相关 逻辑 和 数据 一 般 都 存储 在 ЕВР 系统 中 ， 因 此 可 
以 很 快 地 判断 出 ， 在 不 严重 影响 ERP 系统 性 能 的 前 提 下 ， 这 部 分 增强 应 该 放 在 源 系统 中 
实现 。 

2. 权限 校 验 
通常 来 说 ， 为 了 避免 BW 系统 超级 用 户 对 于 ЕВР 系统 敏感 数据 的 访问 ， 这 一 部 分 增强 


应 该 在 源 系统 中 实现 ， 因 为 数据 一 旦 进入 BW 数据 仓库 系统 中 ， 则 这 些 用 户 理所当然 地 就 对 
这 些 数 据 具 有 访问 权限 。 
3. 转换 


BW 通常 都 需要 进行 一 些 存储 上 的 转换 ， 如 对 于 物料 的 显示 方式 。 这 样 的 转换 建议 在 
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BW 系统 中 实现 ， 因 为 一 旦 在 ERP 系统 中 实施 了 相应 的 转换 ， 则 对 于 别 的 BW 系统 来 说 ， 数 
据 源 就 不 再 具有 之 前 的 格式 和 灵活 性 了 。 

下 面 举例 说 明 如 何在 抽取 需 增 强 中 对 З. 2 节 所 新 建 的 一 般 数据 源 ZDS_DEMO_TCURR Ж 
行 增强 ， 也 就 是 将 日 期 转换 为 正常 日 期 显示 ， 将 比率 (М) 字段 和 比率 (到 ) 字段 填 上 应 
有 的 内 容 。 

1. 如 何 使 用 该 用 户 出 口 

第 1 步 : 需要 告诉 系统 用 户 即 将 开始 启用 这 个 出 口 ， 因 此 必须 先 新 建 一 个 项 目 ， 并 且 将 
增强 RSAP0001 包含 到 项 目 中 。 使 用 事务 码 CMOD 新 建 一 个 项 目 ， 如 项 目 技术 名 称 定 为 
ZBW, 1 4-16 所 示 。 


“и eee omo 900a Ем Өт 


项 目 管理 的 SAP 增 加 


项 目 ZEN | L Өне 


Er 
@ 属 性 
Ожаза 
〇 组 件 
Оз 


$e 显示 2 修改 | 


14-16 ЖЕЛІН ZBW 


7E 22b: 在 弹出 的 对 话 框 中 输入 项 目 名 称 ， 如 “BW 系统 对 于 数据 源 的 增强 ”， 单 击 
“Enhancement Assignments" 按钮 ， 向 新 建 的 项 目 中 增加 出 口 RNAP0001 ， 只 需 在 第 一 行 第 
列 输入 RSAP0001 Ён], АП 4-17 所 示 。 


s "iH eee ов атар mH" @ m 


SAP 增 强 在 增强 项 目 ZBW 里 
= 
增强 短文 本 


|RSAPO001 | 在 АРІ 服务 中 的 客户 函数 调用 


图 4-17 项 目 中 的 增强 


第 3 步 : 单 击 “ 组 件 ” 按 钮 ， 查 看 分 配 到 该 出 口 的 相关 功能 模块 函数 ，RSAP0001 包含 
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4 个 功能 模块 ， 如 图 4-18 所 示 。 


变更 ZBW 


EXIT SAPLRSAP 001 
EXIT SAPLRSAP 002 
EXIT SAPLRSAP 003 
EXIT SAPLRSAP 004 


4-18 RSAP0001 中 的 4 个 功能 模块 


这 4 个 功能 模块 函数 分 别 是 : 
(1) EXIT. SAPLRSAP. 001 交易 数据 数据 源 增强 程序 


D 输入 参数 
I DATASOURCE 数据 源 的 技术 名 称 
І ISOURCE 信息 源 名 称 
I UPDMODE 从 BW 信息 包 指 令 过 来 的 更 新 模式 ,如 L/FE/D 
© 输出 参数 
I T SELECT 从 BW 信息 包 带 过 来 的 选择 条 件 
I T FIELDS 传输 结构 中 的 字段 的 最 终 数据 表 将 由 这 些 字段 实际 构成 
C T DATA 该 内 表 包 含 从 ERP 系统 中 抽取 出 来 的 数据 
C. T MESSAGES 客户 出 口 功 能 的 错误 记录 
(2) EXIT SAPLRSAP 002 主 数据 属性 数据 源 增 强 程序 
Ө 输入 参数 
I DATASOURCE 数据 源 的 技术 名 称 
I CHABASNM 特性 的 技术 名 称 
LUPDMODE 从 BW 信息 包 指令 过 来 的 更 新 模式 ,如 L/F/D 
@ 输出 参数 
I T SELECT 从 BW 信息 包 带 过 来 的 选择 条 件 
I T FIELDS 传输 结构 中 的 字段 的 最 终 数据 表 将 由 这 些 字段 实际 构成 
I T DATA 该 内 表 包 含 从 ERP 系统 中 抽取 出 来 的 数据 
C. T MESSAGES 客户 出 口 功 能 的 错误 记录 
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(3) EXIT. SAPLRSAP 003 文本 数据 源 增强 程序 


OE 输入 参数 
I CHABASNM 特性 的 技术 名 称 
I UPDMODE 从 BW 信息 包 指 令 过 来 的 更 新 模式 ,如 F/D 
@ 输出 参数 
I T SELECT 从 BW 信息 包 带 过 来 的 选择 条 件 
I T LANGU 记录 了 文本 的 语言 ,如 1 - 中 文 
C T TEXTS 该 内 表 包 含 从 ERP 系统 中 抽取 出 来 的 数据 
C_T_MESSAGES 客户 出 口 功 能 的 错误 记录 
EXIT_SAPLRSAP_004 层次 结构 数据 源 增强 程序 


(4) EXIT_SAPLRSAP_004 层次 结构 数据 源 增强 程序 


(D 输入 参数 
I DATASOURCE 数据 源 的 技术 名 称 
I S REQUEST 数据 请 求 的 编号 ( 由 字符 构成 ) 
I S HIEBAS 层次 结构 的 特性 
I S HIEFLAG 层次 结构 控制 符 
I S HIER. SEL 选择 的 层次 结构 的 技术 名 称 
D 输出 参数 
I Т LANGU 记录 了 文本 的 语言 ,如 1 - 中 文 
C. T HIETEXT 该 内 表 包 含 层 次 结构 在 对 应 语言 中 的 描述 
C_T_HIENODE 该 内 表 包 含 层 次 结构 的 所 有 节点 
C_T_FOLDERT 该 内 表 包 含 不 能 被 放 到 层次 结构 中 的 节点 描述 
C_T_HIEINTV 该 内 表 包 含 层 次 结构 中 的 范围 段 


在 本 例 中 ， 因 为 创建 的 数据 源 ZDS_DEMO_TCURR 是 交易 数据 源 ， 因 此 将 采用 EXIT_ 
SAPLRSAP 001 作为 数据 源 增强 的 功能 模块 。 

第 4 步 : 要 实施 的 数据 源 功 能 增强 的 代码 修改 点 并 不 直接 存在 于 函数 EXIT_SAPLRSAP_ 
001() 中， 因为 该 函数 是 存在 于 SAP 的 命名 空间 中 的 〈 用 户 程序 命名 空间 以 “Y” 或 “2Z” 
开头 ) 。 但 是 ， 此 处 代码 修改 存在 于 INCLUDE ZXRSAUOI 中 ， 这 个 INCLUDE 程序 属于 用 
户 命名 空间 ， 用 户 只 需要 双击 该 对 象 ， 就 能 顺利 地 创建 一 个 INCLUDE 程序 ， 任 何 时 候 ， 
只 要 调用 功能 模块 ， 这 个 INCLUDE 程序 就 将 被 调用 ， 从 而 达到 既定 增强 的 目的 。 

第 5 Ж; 在 СМОР 初始 界面 单 击 “ 激 活 ” 按 钮 ， 激 活 新 建 的 项 目 ZBW， 否 则 即使 经 过 
反复 的 测试 ， 仍 然 会 发 现代 码 不 能 被 调用 ， 而 这 样 的 案例 经 常 出 现在 实际 的 实施 项 目的 过 
程 中 。 

2. 用 户 出 口 EXIT_SAPLRSAP_ 001 对 于 货币 换算 数据 源 的 增强 举例 

回 到 数据 源 ZDS_DEMO_TCURR， 用 户 的 目标 是 逐 行 地 将 抽取 到 的 数据 的 字段 进行 转换 
和 填充 ， 因 此 需要 如 下 代码 来 实现 这 个 功能 。 
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FIELD -SYMBOLS: <ісшт > TYPE ісшт, 
<ісші> TYPE tcurf. 
DATA:1 s message TYPE balmi. 
STATICS:1 t teurf TYPE SORTED TABLE OF ісші 
WITH UNIQUE KEY kurst fcurr ісшт gdatu INITIAL SIZE 0. 


LOOP AT c t data ASSIGNING «tcurr >. 


IF 1 t teuf[ ] IS INITIAL. 
SELECT ж FROM пеші INTO TABLE 1 t. tcurf. 
ENDIF. 


LOOP AT 1 t tcurf ASSIGNING «tcurf > WHERE kurst =< tcurr >- kurst 
AND fcurr =< tcurr >- fcurr 
AND tcurr =< tcurr >-ісшт 
AND gdatu > -<ісшт >- gdatu. 
EXIT. "找到 第 一 条 数据 即 可 
ENDLOOP. 


IF sy - subrc < > 0. 

LOOP AT І t tcurf ASSIGNING «tcurf > WHERE kurst =<tcurr > – kurst 
AND tcurr =< tcurr >-ісшт 
AND fcurr =< tcurr >-ісшт 
AND gdatu > -<ісшт >- gdatu. 

EXIT. "找到 第 一 条 数据 即 可 
ENDLOOP. 
ж 如 果 还 是 没 找到 , 则 将 比率 设 为 1 
IF sy - subre < > 0. 


< tcurr >- ffact = 1. 
< tcurr >- tfact = 1. 
ELSE. 
ж 如 果 找 到 了 ,因为 货币 方向 反 了 ,所 以 需要 将 ffact 和 tfact 对 调 一 下 
< tcurr >- ffact =< tcurf > – ffact. " 暂 存 指针 
< tcurf >- ffact =<teurf > — Насі. "将 tfact 换 到 Жас! 
< tcurf »— tfact =< tcurr >— ffact. "从 暂 存 指针 读 取 原来 的 Насі 到 tfact 
ENDIF. 


ENDIF. "IF sy -subrc < > 0. 


<ісшт > – ffact =< tcurf >- ffact. 
< tcurr >— tfact =< tcurf >- Насі. 
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ENDLOOP. "LOOP AT c t data 


ENDFUNCTION. 


通过 RSA3 再 次 抽取 数据 源 Zbs DEMO. TCURR 的 测试 数据 就 会 发 现 ， 相 关 的 数据 字段 
FFACT ЯП ТЕАСТ 已 经 被 填充 了 转换 因子 。 

由 于 TCURF 这 些 信息 存在 于 ЕВР 系统 中 ， 而 ЕВР 系统 本 身 并 没有 提供 相关 的 接口 将 
TCURF 的 数据 抽取 到 BW 系统 ， 因 此 这 些 增强 只 能 在 ЕВР 系统 中 进行 ， 而且 由 于 数据 本 身 
条 目 数 不 是 特别 多 ， 不 会 给 ERP 系统 带 来 严重 的 性 能 问题 ， 所 以 这 里 在 源 系统 端 对 数据 源 
进行 增强 。 

3. 标准 数据 源 增加 字段 的 处 理 

在 实际 的 项 目 中 ， 更 多 的 情况 是 向 标准 的 数据 源 中 增加 字段 ， 然 后 调用 代码 段 对 新 增 的 
数据 源 进行 处 理 。 标 准 数据 源 的 增强 分 为 3 种 类 型 ， 即 一 般 数据 源 增强 、 后 勤 数据 源 增强 和 
其 他 数据 源 增强 。 其 中 ， 一般 数据 源 增强 包括 对 主 数据 的 增强 和 对 财务 、 成 本 、 项 目 、 设 备 
等 交易 数据 源 的 增强 ， 后 勤 数据 源 增强 主要 包括 采购 、 销 售 、 库 存 等 交易 数据 源 的 增强 ; 其 
他 数据 源 的 增强 包括 FI -SL, CO -PA 数据 源 的 定制 和 增强 。 由 于 本 书 主要 讨论 涉及 АВАР 
处 理 的 内 容 ， 因 此 主要 讨论 前 两 种 类 型 的 增强 。 

(1) 一 般 数 据 源 增强 

首先 ,假定 已 经 在 BCT 中 使 用 了 事务 码 RSA5， 激 活 了 标准 的 数据 源 0FI_AR_4， 要 对 
数据 源 进行 增强 需要 按照 以 下 步骤 进行 。 

第 1 步 : 扩展 0FI_AR_4 的 抽取 结构 DTFIAR_3， 增 加 字段 SPART、 类 型 SPART。 使 用 事 
务 码 RSA6 进入 数据 源 列表 ， 在 目录 SAP - R/3FI—FI - AR -I0 下 找到 数据 源 0FI_AR_4， 如 
图 4-19 所 示 。 


am 编辑 (E) 转 到 (6) 层次 结构 (了 实用 程序 (U) 系统 (Y) 帮助 (H) 
Шо Caoa ви ® їз SE 
后 处 理 数据 源 和 层次 结构 


ЕЛЕСТЕТТІ lA |a] er ТЕ ЕТ || 显示 日 志 
НЕШЕ 财务 会 计 

[—m OFI FM 基金 管理 

[-m OFI TV 差 旅 管理 

[一 本 FI-AA 财务 会 计 :资产 会 计 

[-& ЕІ-АР 财务 会 计 : 供应 商 

E FI-AR 财务 会 计 : 客户 
[一 本 FI-AR-IO 主 数据 财务 会 计 : 客户 
|---“ОғІ AR 2 ES 
[— —ZFI AR 4 E 
[— —0ED LOG DÀTA ЕЕ SAP 出 单 人 直通 服务 事件 日 志 
| — —0CLM. INVOICE Es 优化 托 收 管理 的 发 票 
[一 一 oODPILO ӘУЕН: 业务 数据 
| — —O0DPI. DEBITOR = eae 
[———OFI AR 1 Eg : 事务 
一 orIAR-10 Ë йаман» 

OFI AR 20 Eg $5 

[OFT AR 3 E 客户 ; УНН 
[—— —O0FI AR 30 SS 寡 户 行 项 目 
[— —O0FI AR 31 s 寡 户 到 期 日 分 析 
0FI_AR_4 ||-— Ер: 带 有 增 量 提取 的 行 项 目 
[— —O0FI AR 5 Шар: 支付 历史 


4-19 SAP 标准 数据 源 层次 结构 
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单 击 选中 数据 源 后 ， 单 击 “ 增 强 提取 结构 ”按钮 ， 此 时 系统 弹出 增强 结构 技术 名 称 输 
入 界面 ， 如 图 4-20 所 示 。 


Ге? Create for 


Append Name РАПТЕТАЕ 3 


У/ж 


4-20 增强 结构 技术 名 称 输入 界面 


fü (Enter) 键 进入 增强 结构 维护 界面 ， 在 “短文 本 ”文本 框 中 输入 增强 的 说 明 ， 如 “增加 
品 组 ”， 在 下 面 的 列表 中 增加 SPART 字段 ， 类 型 为 产品 组 数据 元 素 SPART, "lE 4-21 所 示 。 


Ге 


Structure 编辑 (E) HFG) 实用 程序 (U) 细节 (X) Environment 系统 (Y) 帮助 (H) 


% іи eae Bs «sess rp pr 


字典 : 维护 追加 结构 
ОР ali |l | гъ | | еа | append structure... | 
附加 结构 ZADTFIAR 3 新 的 (已 修正 ) 


短文 本 | 增加 产品 组 


图 4-21 增强 结构 维护 界面 
单 击 “ 激 活 ” 图 标 国 ， 激 活 新 增 的 附加 结构 ， 在 弹出 的 开发 类 中 选择 自己 的 开发 类 ， 
忽略 系统 的 警告 信息 。 返 回 数据 源 列表 界面 ， 此 时 通过 双击 数据 源 进入 数据 源 信息 显示 界 
面 ， 如 图 4-22 所 示 。 


= 
数据 产 (D) 系统 (Y) 帮助 (H) 


2 TT pm З mm OG 


数据 源 : 用 户 版 本 显示 


ЭЦ ЕЙ OFI AR 4 (ZIDES EW | 
EA: 带 有 增 里 提取 的 行 项 目 


Em 
提取 结 构 
直接 访问 D 


Delta 更 新 用 于 调整 的 数据 源 


图 4-22 数据 源 信息 显示 界面 
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双击 提取 结构 “DTFIAR_3”， 进 入 数据 源 OFL АВ 4 的 提取 结构 ， 可 以 看 到 新 增 的 字段 
附加 到 了 结构 的 最 后 ， 如 图 4-23 所 示 。 

ym 编辑 (E) EG) 实用 程序 (U) 细节 (X) Environment 系统 (Y) 帮助 (H) 

€ п чоеае вав өтіл p @ mm 

字典 : 显示 结构 

БЕ ЕЕ ЕСІ JE] | Es] | JEN] | 层次 结构 显示 || Append Structure... 


am DIFIAR 3 Lr 
短文 本 | 数据 传输 : BW 客户 条 目 (新 的 ) 


|component type 

SHKZG CHAR 1 0 借方 /贷方 标识 
[] WRBTR CURR 13 2 任 证 货币 金额 
C CI BSID 0 0 
Г1 ZADTFIAR 3 un 0 0 增加 产品 组 
Г] SPART CHAR 2 0 产品 组 


图 4-23 数据 源 提取 结构 显示 界面 
第 2 步 : 设置 数据 源 字 段 的 属性 。 此 时 需要 在 数据 源 的 设置 中 ， 将 新 增加 的 字段 的 
“隐藏 ”属性 去 掉 。 在 此 返回 数据 源 列表 界面 ， 选 中 数据 源 0FI_AR_4 后 ， 单 击 “ 修 改 ” 图 
标 园 进入 数据 源 的 属性 设置 界面 ， 此 时 的 界面 和 图 4-23 所 示 的 显示 界面 相同 ,但 是 在 此 处 
可 以 对 字段 进行 修改 和 维护 ， 如 图 4-24 所 示 。 


字段 名 短文 本 选择 隐藏 字段 。 | 转换 отела 10 
REBZG 业务 所 属 的 发 票 号 码 m= 口 П П EÉ 
REBZJ 有 关 发 票 的 财政 年 度 (ИШНЕН) = ы 
REBZZ 相关 发 票 中 的 行 项 目 

ЕТСЕ 付款 原因 代码 : 

SAKNR 总 帐 科目 编号 

SGTXT 项 目 文 本 

SHKZG 借方 /贷方 标识 El 

SK1DT 据 现金 折扣 项 目 1 的 到 期 日 Е] 

SK2DT 据 现金 折扣 项 目 2 的 到 期 日 口 m = 


5КЕВТ ШЫ: АЛДАШ: ЕЗ HUE 
SENTO 本 币 的 现金 折扣 金额 


图 口 口 口 口 口 口 口 图 口 口 口 口 图 口 口 口 口 口 


SPART 产品 组 

STATUSPS БІЛЕ 

UNSKS 特殊 总 分 类 帐 事务 类 型 m 

UNSKZ 特殊 总 帐 标识 = 

DUPDMOD BW Delta 进程: 更 新 模式 m D) O 

UPOSZ зве = Г B 
VBELN янне - 

VAERS 货币 码 | 2 
ҮЕЕТЕ рете [ T 


图 4-24 数据 源 输 出 结构 维护 界面 
从 图 4-24 中 可 以 看 到 ， 新 增 的 字段 SPART 的 “隐藏 字段 ”和 “ 仅 在 客户 退出 中 已 知 
的 字段 ”都 被 默认 的 勾 选 了 ， 为 了 让 字段 传输 到 BW 系统 ， 在 此 处 将 两 个 单 选 框 去 掉 ， 否 
则 该 字段 将 不 会 出 现在 传输 结构 中 ， 进 而 对 BW 隐藏 。 
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字段 SPART Л 


20 


# 323b. 在 用 户 出 口 RSAPOO01 中 使 用 EXIT_SAPLRSAP_001 的 包括 程序 ZXRSAUOI 对 


了 程序 代码 的 增强 。 
(2) 后 勤 数据 源 增强 


一 般 数 据 源 的 扩展 主要 针对 非 后 勤 交 易 数 据 和 所 有 的 主 数据 ， 但 是 
据 源 的 处 理 占据 了 主要 的 精力 和 工作 量 ， 后 勤 数 据 源 是 在 后 勤 管理 工作 台 LBWE 中 进行 集 
中 管理 ， 这 里 以 2LIS_13_VDITM 为 例 说 明 后 勤 数据 源 的 增强 ， 具 体 步骤 如 下 。 

第 1 步 : 进入 LBWE 后 勤 数据 源 定制 主 控 室 ， 在 “13:SD 出 具 发 票 BW” 下 找到 数据 源 
2LIS 13. VDITM, ， 如 图 4-25 所 示 。 


[Eg 
| 主 控 室 (C) EE) 转 到 (6) 系统 (Y) 帮助 (H) 
16 CGO CHR ааа Ог 


项 目 中 ， 后 勤 交 易 数 


Ў ju 02 : 采购 fries] 2 直接 增 量 
р Фоз: 库存 控制 作业 控制 2 直接 增 量 
р Q 04 : 车 间 现场 控制 作业 控制 2 直接 增 时 
р Фо5: 质量 管理 作业 控制 2 直接 增 里 
р Фо: 发 票 核验 作业 控制 2 直接 增 量 
р %08:%55 作业 控制 2 直接 增 量 
р 11:50 销售 BW 作业 控制 2 直接 增 里 
》 鲁 12:LE 运 送 Bw 作业 控制 。“” 必 直接 增 里 
v Ф13:50 出 具 发 票 BW 作业 控制 2 ERNE 
v 多 提取 结构 E ——— = 

b COO MC13VD0HDR: 提取 SD “ғұр BW: iHi РАНА 2 2115 13 VDHDR 2 жау 

b СОО MCi3VDOITM: 提取 SD ДЕ BW: НАН 2 $h 122155 13 VDITM 2 Sz 

b СОО MCi3VDOKON: 提取 SD FÆ BW: SERU Sh 2 2115 13 VDKON 2 Sz 


图 4-25 后 勤 数 据 源 定 
单 击 数据 源 后 面 的 “维护 ”图 标 ， 系 统 进 


制 主 控 室 


区 选择 标准 
| 
MCVBRK AEDAT 更 改 日 期 a 
MCVBRK BUKRS 公司 代码 (7 MCVBRK АТІММ4 内 部 特性 ” 
MCVBRK BZIRK 销售 地 区 МСУВЕК АТІММ5 内 部 特性 
MCVBRK FKART 开票 类 型 (“| MCVBRK АТІММ6 内 部 特性 
MCVBRK FKDAT 出 县 发 票 日 其 МСУВЕК АТІММ7 内 部 特性 
MCVBRK FKTYP 出 县 发 票 类 4 MCVBRK BELNR HIERS 
MCVBRK HWAER ЖТП i MCVBRK BSTNK VF PO 2% 
MCVBRK KDGRP 客户 组 MCVBRK BUPLA 业务 地 点 
MCVBRK KUNAG 传达 方 [7 МСУВЕК BVTYP 合作 银行 类 
MCVBRK KUNRG 4% Б MCVBRK CITYC 城市 代码 
MCVBRK KURRF 会 计 汇率 [= MCVBRK CMKUF ГЕ 2 
MCVBRK KURST 汇率 类 型 X MCVBRK CMWAE 货币 ы 
当前 /最 大 号 码 9ЗІШ 999 а 


v ESTER 


ЕЗ 


入 数据 源 的 字段 维护 视图 ， 如 图 4-26 所 示 。 


D 


4-26 后 勤 数据 源 的 字段 维护 视 


器 


在 右上 角 的 下 拉 列 表 框 中 ， 单 击 全 部 后 面 的 按钮 图 可 以 ”全 ERETTE 
看 到 数据 源 的 所 有 来 源 字 段 ， 如 图 4-27 所 示 。 MOVBUK ABE: Славни 

从 图 4-27 中 可 以 看 到 ， 所 有 的 数据 源 字段 来 源 于 4 个 视 "ОНР MENE nawe 
ІІ, ШІ MCVBRK, MCVBRP, MCVBUK 和 MCVBUP， 因 此 如 
果 能 够 在 这 4 个 结构 中 找到 需要 的 字段 ， 那么 需要 做 的 事情 
就 是 从 右边 将 字段 选择 到 左边 即 可 。 这 种 系统 自 带 字段 相对 于 自 开发 字段 的 好 处 在 于 ， 系 统 
自 带 字段 的 变更 会 作为 增 量 写 人 到 数据 源 增 量 队列 中 ， 进 而 抽取 到 BW 系统 。 如 果 在 这 4 个 
结构 中 不 存在 用 户 所 需要 的 字段 ， 如 希望 给 销售 开票 行 项 目 增 加 订单 号 以 及 订单 行 项 目 ， 则 
需要 先 修改 对 应 的 视图 ， 增 加 相应 的 字段 。 因 为 要 增加 的 是 销售 订单 号 以 及 销售 订单 行 项 
目 ， 所 以 在 MCVBRP 中 增加 字段 。 因 此 先 退 出 数据 源 维护 界面 。 

第 2 步 : 进入 事务 码 SE11 界面 ， 在 数据 类 型 中 输入 “MCVBRP”， 如 图 4-28 所 示 。 


图 4-27 来 源 字段 


加 数据 库 表 
ona 


加 数据 类 型 NCVERP| B 
O Type Group 


Ов 
口 搜索 帮助 
O isi 


E вт 2 修改 n» 创建 | 
图 4-28 结构 更 改进 入 界 矣 


单 击 “显示 ”按钮 进入 结构 的 显示 界面 ， 如 图 4-29 所 示 。 


Е Structure 编辑 (E) 转 到 (6) _ 实 用 程序 (U) 细节 (X) Environment 系统 (Y) 帮助 (H) 
[e аш eoe CHH ania cog 
字典 : 显示 结构 


[Es fp] Е || 层次 结构 显示 || Append Structure... 


结构 _ . [MCVBRP | IE 
Ex БЕІН ; 


ИГТ" Components Entry help/check , 货币 /数量 字段 


Е 1 / 387 
Component ЕТу. [Component type Data Type 长 度 小 数位 ”| 短文 本 
O WBRP EL 0 出 有 发 票 : 项 数据 
ант C MANDT CLNT 3 Er 
| [EELN ГІ WBELN VF CHAR 10 OREHE 
| |POSNR [] POSNR VF NUMC & 0 出 具 发 票 项 目 
| |UEPOS C UEPOS NUNC 6 0 物料 单 结构 中 的 上 层 项 目 
ЕКІМС C ЕКШС QUAN 13 3 实际 已 开票 数量 


4-29 А ЖАУЫП 
单 击 “Append Stmucture” 按 钮 ， 进 入 附加 结构 维护 界面 ， 如 图 4-30 所 示 。 说 明 ， 如 果 
之 前 没有 附加 结构 ， 则 系统 直接 进入 如 图 4-31 所 示 的 附加 结构 创建 界面 。 
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EFR 显示 结构 田 


SERALE] Eeen] 

对 象 名 称 状态 短文 本 Switch 
| New | High-Tech-Erweiterung MCVBRP /SAPHT/SW 
New 


| ETM SD Faktura Kommunikationsstruktur im VIS |/$АРСЕМ/ЕС‹ 


MCVBRPBWAP Active | Append fir Transfer BW 


4-30 ”附加 结构 列表 界面 


ГЕ Create for MCVBRP m 


Append Name ZZDEMO 


vixi 


4-31 附加 结构 创建 界面 1 


单 击 “ 创 建 ”按钮 器 | 进 入 新 附加 结构 的 技术 名 称 输入 界面 ， 输 入 “ZZDEMO”， 如 
图 4-31 所 示 。 

ë 《Enter〉 键 进入 下 一 屏 附 加 结构 维护 界面 。 在 该 界面 中 ,输入 附加 结构 的 文本 描 
述 ， 以 及 需要 添加 的 字段 “销售 单位 目标 数量 ”和 “目标 数量 计量 单位 ”， 如 图 4-32 
所 示 。 


Ге 
Structure ИҢЕ) EN(G) ЖННЕНДШ) 细节 (X) Environment 系统 (Y) AER) | 


@ "ан eee DHH anna mom 


字典 : 维护 追加 结构 


HE Ө] ®[1 ЕТЕГІН | хех | append structure... | 


附加 结构 ZZDEMO 激活 
短文 本 增加 销售 订单 信息 


Components 


短文 本 

| L] DZNENG QUAN | ss 3 销售 单位 目标 数量 

ІШішЕ IT | zi 0 目标 数量 计量 单位 
口 | | 


4-32 附加 结构 维护 界面 2 


以 上 设置 完毕 后 ， 激 活 附加 绪 构 ， 返 回 结构 显示 界面 可 以 看 到 ， 在 结构 MCVBRP 的 最 
后 多 了 一 个 附加 结构 和 两 个 附加 字段 ， 如 图 4-33 所 示 。 
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E 


Structure 编辑 (E) 转 到 (6) 实用 程序 (U) 细节 (X) Environment 系统 (Y) 帮助 (H) 


> Ue lal 


字典 : 显示 结构 
ЯЛЫ аа) о El len [i] |Н) | | 层次 结构 显示 || Append Structure... | 
结构 [nmCYERP 激活 
短文 本 | 票据 任 证 :项 目 数据 ; 
B ST 
«eres eec [И || Predefined Туре | 379 / 390 
| [component ^ [Rry,componenttype |раа туре [ez 导数 位 [ex 
| [BE O MCEW MVE QUAN 15 SBW: ДЕНІНЕ 
| ТЕнсвор CO MCEW GEOD RR 29 2 BW: 按 任 证 货币 的 成 本 值 
| EuGvop CO MCEW GYOD URR 16 2 BW: ЗЕТА ЕЕН 
| BycyED Г] MCBW GVPD RR 19 2 Bw: 按 任 证 货币 的 含 税 零售 值 
BWPNLD ГІ MCEW PNLD URR 19 2 BW: НЕТТІ ЖАҒЫ 
a O RSAPPLNM AR 30 0 应 用 程序 组 件 
| |BWSUPKZ Г MCEW SUPKZ AR 1 0 辅助 统计 更 新 标识 
| [ByERzE- Г] ERZEI INS 6 OARE 
BYDUMMY CO MCEW DUNMY HAR 1 0328» SAPBW 的 虚拟 功能 
于 Г ZZDEMO un 0 0 增加 销售 订单 信息 
| Ez ZMENG CO DZMENG QUAM 13 3 销售 单位 目标 数量 
| Z zigm ГІ DZIEM IT 3 0 目标 数 星 计 里 单位 


图 4-33” 主 结构 显示 界面 


第 3 步 : 回 到 LBWE 后 勤 数据 源 控制 台 ， 再 次 单 击 数据 源 2LIS_13_VDITM 后 面 的 “ 维 
护 ” 图 标 进 入 到 数据 源 维护 界面 。 在 右上 角 选 择 视 图 MCVBRP 后 ， 在 右边 最 下 面 看 到 存在 
两 个 新 增 的 字段 ZZ ZMENG 和 ZZ_ZIEME， 如 图 4-34 所 示 。 


MCVBRK AEDAT 更 改 日 期 


BUKRS 公司 代码 
BZIRK 销售 地 区 
FKART 开票 类 型 
FKDAT 出 县 发 票 日 其 
FKTYP 出 具 发 票 类 另 
HWAER Ж 

KDGRP 客户 组 
KUNAG 8255 
KUNRG HIRA 


CVBRP WMAKG 物料 类 型 [4] 
CVBRP WRKGRI 工厂 组 1 [7] 
СУВЕР WRKGR2 工厂 组 2 


СУВАР ZZ ZIEME НІНЕ 


KURRF 会 计 汇率 
KURST 汇率 类 型 


O | [»] 


当前 /最 大 号 码 


“Б/Б ж 


эз 999 


口 在 当前 组 中 检索 


图 4-34 后勤 数据 源 提取 结构 查看 
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此 时 将 右边 的 这 两 个 字段 使 用 系统 移动 功能 移动 到 左边 ， 可 以 看 到 右边 的 字段 消失 了 ， 
在 左边 的 最 下 面 出 现 了 两 个 字段 ， 如 图 4-35 所 示 。 


区 选择 标准 
ЧЕ |MCVERP: Eig ЕЛДЕ D 
ah | 
MCVBRP WMAKG 物料 类 型 | 全 
MCVBRP WRKGR1 ТГ 1 T 
МСУВЕР WRKGR2 工厂 组 2 
МСУВЕР XCHAR 批 次 
MCVBRP YYCALLID Call Cen 


标准 

MCVBRP WERKS ТГ 
MCVBUK VBELN {HEE 
MCVBUP POSNR 项 目 
CVBRP ZZ ZIEME 目标 数量 
CVBRP ZZ ZMENG 目标 数 映 


ч 


当前 /最 大 号 码 95 999 BE 
口 在 当前 组 中 检索 


v EIER [x] 


图 4-35 从 右边 增加 字段 到 左边 列表 后 的 界面 


fü (Enter) 键 确认 后 ， 系 统 弹 出 输入 确认 对 话 框 ， 单 击 “ 是 ”按钮 ， 如 图 4-36 所 示 。 


蕊 输入 确认 四 
您 确实 要 确认 这 些 输入 ? 


图 4-36 ”信息 提示 界面 


注意 ， 此 时 系统 可 能 出 现 错误 提示 ， 提 示 在 系统 的 设置 表 和 增 量 队 列 中 还 存在 着 数据 ， 
因此 在 进行 后 勤 数 据 源 的 结构 更 改 时 最 好 先 将 设置 表 以 及 增 量 队列 清空 。 新 的 抽取 结构 生成 
后 ， 系 统 会 自动 将 数据 源 设置 为 非 激 活 状 态 ， 如 图 4-37 所 示 。 


了 @13 : 5D ЕФ BW 作业 控制 2 直接 增 量 
v 多 提取 结构 
р COO MC13VDOHDR: 提取 SD JE E BW: На: Hh 2 2115 13 VDHDR 2 Xf 
V ОО MCI3VDOITM: 提取 SD ағы BW: EAE Zh 22165 13 УПМ 2 未 激活 
У 安 事 件 
VD : 开票 单 证 
р ООО мсізурокон: 提取 SD ғыр BW: 和 任 证 条 件 2 uh 2 2115 13 VDKON 2 Sz 


44-37 数据 源 维护 界面 


与 其 他 数据 源 添加 了 字段 之 后 需要 对 字段 的 “隐藏 字段 ”和 “ 仪 在 客户 退出 中 已 知 的 
字段 ”属性 进行 设置 一 样 ， 后勤 数据 源 在 增加 了 字段 后 ， 下 一 步 也 需要 对 输出 结构 进行 设 
置 。 单 击 “ 维 护 ” 图 标 后 的 数据 源 名 ， 进 入 数据 源 输出 结构 维护 界面 ， 如 图 4-38 所 示 。 
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抬头 数据 

Sum |2LIS 13 VDITIM 开发 类 750 
描述 FEAS 

提取 

提取 结构 ]NC1SVDOIT 

直接 访问 D 

Delta 更 新 М 于 调整 的 数据 源 


短文 本 


в 仅 在 客户 退 | 
VAERK SD EKT 口 E] 
VAWR ратор М 

WERKS ШГ 口 


ZZ ZIEME 。 目标 数量 计量 单位 
ZZ ШЕН: ”销售 单位 目标 数量 


[<] []Г1Г1Г1 


图 4-38 ”数据 源 输出 结构 维护 界面 


由 于 此 处 的 字段 以 “ZZ_” 开 头 ， 因 此 字段 会 出 现在 最 下 面 ， 将 字段 的 “隐藏 字段 ”和 
“ 仅 在 客户 退出 中 已 知 的 字段 ”取消 色 选 并 保存 ， 退 出 输出 结构 维护 界面 ， 回 到 后 勤 数 据 源 主 
控 室 。 此 时 可 以 发 现 ， 数 据 源 2LIS_13_VDITM 前 面 的 状态 标识 从 红色 变 成 了 黄色 ， 如 图 4-39 
所 示 。 


v 13:50 出 具 发 票 BW 作业 控制 2 ERRE 
v брен} 
b COO MCI3VDOHDR: 提取 SD ХЕ BW: Siik PHP 22115 13 VDHDR 2 Sz 
57 OMO MC13VDOITM: 提取 SD ғыр BW: SEAE Hh 22105 13 тм 2 RYA 
р % 事 件 


р СОО мсізурокон: 提取 SD ғыр BW: 和 任 证 条 件 HP 2 2115 13 VDKON 2 活动 的 


4-30 数据 源 维护 界面 〈 未 激活 ) 


N 


此 时 ， 只 需要 单 击 数据 源 后 面 的 “未 激活 ”图 标 ， 即 可 将 数据 源 切换 为 激活 状态 ， 如 
图 4-40 所 示 。 


了 @13 : sp 出 具 发 票 BW 作业 控制 2 直接 增 量 
у Әт 
b СОО MCi3VDOHDR: 提取 SD Жа ғыр BW: На 2 ih (2 2115 13 VDHDR 2 Sz 
у OCO MCI3VDOITM: 提取 SD Д1 BW: EAA Sh 2 2LS_13_VDITM Жат 
DP 安 事件 


р СОО мсізурокон: 提取 50 AEE BW: SERI uh 22115 13 VDKON 2 xf 


图 4-40 ”数据 源 维护 界面 (活动 的 ) 


第 4 J. 在 用 户 出 口 RSAP0001 中 使 用 EXIT_SAPLRSAP_001 的 包括 程序 ZXRSAUOI 对 
字段 ZZ ZIEME 和 ZZ ZMENG 进行 程序 代码 的 增强 。 

4. 应 用 层次 结构 出 口 增强 

一 般 来 说 ，ERP 提供 了 标准 的 层次 结构 数据 源 ， 用 于 将 ERP 中 的 层次 结构 传输 到 BW 
系统 中 ， 如 成 本 中 心 、 利 润 中 心 、WBS 元 素 等 都 有 自己 的 层次 结构 数据 源 ， 大 多 数 时 候 这 
些 数 据 源 本 身 就 够 用 了 ， 不 需要 调用 层次 结构 增强 函数 EXIT_SAPLRSAP_004( ) 进行 增强 。 
正 因为 这 个 增强 在 项 目 中 几乎 不 被 用 到 ， 所 以 在 此 借用 数据 源 0COSTCENTER_0101_HIER 
进行 增强 的 演示 和 说 明 。 
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假设 有 以 下 需求 ， 由 于 ЕВР 系统 中 有 众多 的 成 本 中 心 ， 并 且 根 据 成 本 中 心 的 编号 和 描 
述 ， 难 以 直接 知道 成 本 中 心 所 处 的 层次 ， 如 有 成 本 中 心 K3001 处 于 层次 结构 的 第 三 层 ， 那 
么 用 户 可 能 希望 将 03 这 个 信息 也 加 入 到 成 本 中 心 的 描述 中 ， 语 句 如 下 。 


* 用 户 出 口 ZXRSAU04 的 增强 示例 


*& * 
*& 包括 ZXRSAU04 
*& * 


DATA :l_hienode TYPE rsap s hienode, 
1 foldert TYPE rsap. s дегі, 
1. oldname LIKE c. t. hienode – nodename, 
] newname LIKE с t. hienode - nodename. 

BREAK - POINT. 

CASE і datasource. 

WHEN OCOSTCENTER, 0101 HIER . 
CASE i s hiebas — hclass. 

* 成 本 中 心 层 次 结构 名 称 
WHEN' 0101 . 

* 修改 名 称 

LOOP AT c t hienode INTO 1. hienode. 
CHECK 1. hienode — iobjnm = OHIER, NODE . 


1 oldname -1 hienode - nodename. 


1 hienode — nodename(2) -1 hienode - tlevel. 
1 hienode - nodename +2(1) = '. 
] hienode - nodename +3 - 1 oldname( 16). 
MODIFY c. t. hienode FROM 1 hienode. 
ж 同步 表 c_t_foldert 中 的 节点 描述 
READ TABLE c_t_foldert INTO 1_foldert 
WITH KEY langu = sy - langu 
iobjnm = ОНІЕК NODE 
nodename = l, oldname. 
IF sy - subre -0. 
] foldert - nodename = 1 hienode - nodename. 
MODIFY c t foldert FROM 1 foldert INDEX sy – tabix. 
ENDIF. 
ENDLOOP. 


WHEN OTHERS. 


ENDCASE. “CASE i в hiebas — hclass. 
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WHEN OTHERS. 


ENDCASE. “CASE i datasource. 


H Р C T HIENODE 中 包含 了 层次 结构 所 有 的 节点 以 及 节点 在 层次 结构 中 的 位 置 关 
R, ÆR C_T_FOLDERT 中 包含 了 层次 节点 的 描述 ， 因 此 在 上 述 代码 中 根据 C_T_HIENODE 
的 层级 信息 修正 CT_FOLDERT 中 的 描述 信息 。 

5. 实施 一 般 层次 结构 抽取 器 

ERP 系统 提供 的 一 般 数据 源 制 作 工 具 并 不 能 直接 制作 层次 结构 数据 源 ， 为 了 解决 这 个 
问题 ， 有 两 个 办 法 : 一 是 将 ERP 中 的 层次 结构 关系 二 维 表 抽 取 到 BW 系统 ， 在 BW 系统 中 
通过 АВАР 代码 的 方式 直接 进行 层次 结构 的 生成 ;二 是 采用 以 下 步骤， 通过 增强 的 方式 
完成 。 

假如 用 户 需要 生产 层次 结构 的 信息 对 象 叫 作 DOBJ。 

第 1 步 : 根据 РОВ] 创建 一 个 信息 对 象 DEXP。 

第 2 步 : 将 DEXP 生成 输出 数据 源 。 

第 3 部 : 将 数据 源 DEXP_HIER 连接 到 目标 信息 对 象 DOBJ。 

第 4 步 : 在 ZXRSAU04 中 编写 代码 对 数据 源 DEXP_HIER 进行 处 理 。 

第 5 Ж: 在 DEXP 信息 对 象 上 创建 一 个 含有 一 个 节点 的 层次 结构 。 

第 6 步 : 在 数据 源 上 创建 一 个 信息 包 ， 用 以 加 载 数据 。 

第 7 步 : 执行 信息 包 ， 上 载 层次 结构 。 

作者 还 将 在 后 续 章节 详细 讨论 如 何 实 施 该 段 ABAP 代码 ， 以 及 在 BW 系统 中 如 何 管理 层 
次 结构 。 

6. 从 BW 系统 向 用 户 出 口传 递 参数 变量 

在 少数 时 候 用 户 可 能 希望 从 BW 系统 传输 一 些 参数 到 ERP 系统 中 ， 以 作为 条 件 在 用 户 
出 口中 进行 调用 。 例 如 ， 有 些 时 间 相关 的 主 数据 或 交易 数据 需要 在 用 户 出 口中 使 用 BW 系统 
传输 过 来 的 条 件 ， 则 可 以 按照 如 下 步 又 进行 实施 。 

第 1 步 : 向 数据 源 的 抽取 结构 中 增加 一 个 字段 ， 如 ZZ_AEDAT。 

第 2 步 : 在 数据 源 的 后 处 理 (RSA6) 中 ， 将 该 字段 作为 数据 源 的 选择 字段 ， 这 样 在 
BW 系统 通过 “复制 元 数据 ”和 “激活 ”两 个 动作 之 后 ， 在 信息 包 中 ,， 用 户 就 能 看 到 这 个 
选择 条 件 了 。 

第 3 步 : 在 数据 表 I_T_SELECT 中 ， 所 有 的 选择 条 件 都 会 从 BW 系统 的 数据 包 传 输 到 
ЕВР 系统 中 ， 所 以 可 以 用 “FIELDNM = ZZ AEDAT. ”来 读 取 选择 条 件 ， 然 后 用 该 条 件 对 数 
据 进 行 选择 和 限制 。 

详细 代码 参见 4. 2. 1 节 的 功能 函数 ZDS_DEMO_FM_MBEW() 中 的 部 分 代码 。 


4.2.3 使 用 BADI RSUS SAPI BADI 


BADI RSUS. SAPI. BADI 和 用 户 出 口 RSAPOO01 同时 存在 于 ERP Ж ҰН, ШІН АВАР i& 

言 的 发 展 方向 来 看 ， 该 BADI 的 主要 作用 是 SAP 准备 用 来 奉 换 用 户 出 口 RSAPOO01 的 , 但 是 

目前 所 有 SAP 官方 的 材料 中 并 没有 提 及 这 一 点 ， 也 就 是 说 用 户 既 可 以 使 用 该 BADI， 也 能 使 
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用 原先 的 用 户 出 口 RSAP0001。 
1. 对象 方法 


与 用 户 出 口 RSAP0001 包含 4 个 功能 函数 对 应 到 4 种 不 同 数据 源 做 法 不 一 样 的 是 ，BADI 
RSUS SAPI BADI 本 身 只 包含 了 两 个 方法 : 第 一 个 方法 是 DATA_TRANSFORM， 主 要 为 交易 
数据 、 主 数据 属性 和 主 数据 文本 数据 源 服务 ;第 二 个 方法 是 HIER_TRANSFORM ， 主 要 为 层 
次 结构 数据 源 服务 。 但 是 和 用 户 出 口 比 起 来 ，BADI 又 没有 太 大 的 变化 ， 如 果 需 要 切换 ， 则 


可 以 不 进行 任何 代码 的 调整 。 


相对 于 用 户 出 口 ，DATA_TRANSFORM 方法 去 掉 了 两 个 参数 I_ISOURCE ЯП 1_СНА- 
BASNM, ， 因 为 这 些 对 象 能 够 从 数据 源 的 名 称 中 派生 出 来 ， 其 他 的 参数 见 表 4-1。 
表 4-1 DATA TRANSFORM 接口 参数 


ЖОЖ 参数 说 明 
I DATASOURCE 数据 源 的 技术 名 称 
I UPDMODE 更 新 模式 
I T SELECT 数据 请 求 的 选择 条 件 
I T FIELDS 请 求 的 字段 
C_T_DATA 数据 源 抽取 到 的 数据 内 表 
C T MESSAGES 消息 日 志 


但 是 相对 于 用 户 出 口 ，HIER_TRANSFORM 的 变化 就 大 得 多 。 去 掉 了 DS HIEBAS, H 
为 信息 对 象 能 够 从 数据 源 的 名 称 中 派生 出 来 ; 同时 灵活 的 层次 结构 中 的 LS_HEADER3 С. 
T HIENODE3, C T HIEINTV3 被 取消 了 ， 因 为 BADI 被 设计 为 不 支持 灵活 的 层次 结构 加 载 ， 
只 能 在 BW 系统 中 对 信息 对 象 进行 直接 更 新 ， 其 他 的 参数 见 表 4-2, 
X4-2 HIER TRANSFORM 接口 参数 


Ж Ж 参数 说 明 
I DATASOURCE 数据 源 的 技术 名 称 
I S HIEFLAG 层次 结构 的 控制 标识 ， 如 事件 相关 性 
I S HIER, SEL 选中 的 层次 结构 
I T LANGU 不 同 语言 的 表 
C T HIETEXT 语言 相关 的 层次 节点 描述 
C_T_HIENODE 层次 节点 表 
C_T_FOLDERT 文件 夹 节 点 
C T HIEINTV 层次 节点 范围 段 
C_T_MESSAGES 消息 日 志 


2. 优 缺点 比较 

在 以 往 的 项 目 上 ， 用 的 更 多 的 是 用 户 出 口 ， 但 是 笔者 建议 在 后 续 如 果 还 需要 对 数据 源 进 
行 增强 ， 则 更 多 地 使 用 BADI 的 方式 。 

BADI 的 优势 在 于 ， 能 够 为 每 一 个 数据 源 创建 单独 的 实施 ， 特 别 是 在 大 的 项 目 团 队 一 起 
工作 时 ， 这 点 在 2.2.3 节 中 已 经 探讨 过 。 另 外 一 个 优势 在 于 ，BADI 是 使 用 面向 对 象 的 
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АВАР 00 方式 进行 编写 的 ， 符 合 未 来 的 发 展 趋势 。 

3. 实施 步骤 详解 

假设 有 如 下 需求 ， 需 要 对 ЕВР 系统 中 所 有 工厂 的 配置 进行 检查 ， 查 看 是 否 允 许 负 库存 ， 
同时 需要 通过 工厂 得 到 对 应 分 配 的 公司 代码 。 因 此 ， 需 要 在 数据 源 OPLANT_ATTR 的 提取 结 
Tj BIW. TOO1 WS 上 增强 字段 XBKNG 和 BUKRS， 如 图 4-41 所 示 。 


附加 结构 [ZDENO BADI O ga 
短文 本 10PLANT_ATTR 数 据 源 增强 


短文 本 
1 ЖЕКІС 0 评估 域 多 许 有 负 库 存 
[| BUKRS CHAR 4 0 公司 代码 


4-41 ”数据 源 抽取 结构 增强 


在 添加 附加 字段 后 ， 按 照 3.3.3 节 中 介绍 的 方法 修改 提取 结构 中 的 隐藏 字段 ， 本 处 不 再 
TOR, 

完成 上 述 工作 后 ， 实 施 客户 化 的 BADI 代码 ， 步 又 如 下 。 

第 1 步 : 输入 事务 码 SE19， 进 入 增强 实施 界面 ， 在 屏幕 的 下 半 部 分 可 以 看 到 如 图 4-42 
所 示 的 界面 。 


Create Implementation 


O New BAdI 
Enhancement Spot | pum D 


© Classic BAdI 
BAdI Name [RSUS SAPI BADI| 


D» Create Impl. 


Р 4-42 ВАЧ ӨЗЕНІ 


1 


58 22b. 在 BAdI Name 中 ,输入 系统 自 带 技术 名 称 К505 SAPI. BADI, Ji; “Create 
Impl. ”按钮 创建 一 个 新 的 实施 ， 如 78505 SAPI BADI， 如 图 4-43 所 示 。 


[z Business Add-In Builder: Create Implementation x 
Definition Name Е505 SAPI BADI 
Implementation Name 188505 SAPI BADI 


图 4-43 ВА £598 3: PL Th 


N 
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第 3 步 : 确定 后 ， 进 入 实施 代码 的 详细 页 面 ， 在 该 页 面 需要 输入 实施 的 简短 描述 ， 如 这 
里 输入 “对 数据 源 进行 增强 ”， 如 图 4-44 所 示 。 
= 


a О: ГЕК Л ЕЕ Шера е. 


Business Add-In Builder: Change Implementation ZRSU5 SAPI BADI 
22а аа) о 1а ЕЛЕНЕ | 
Implementation Name ZRSUS SAPI BADI Inactive 


Implementation Short Text 对 数据 源 进行 增强 
RSUS SAPI BADI 


Implementation Edit Goto Utilties(M) Environment 系统 (Y) 帮助 (H) 


Definition Name 


$ТМР 


[ZH] 中 文 
PAHXIE 


|2012. 09. 24 [15:28:26] 


Multiple use 


Г Fiter-Depend. 
А 4-44 ВА! 属性 维护 界面 
第 4 步 : 单 击 “Interface” 标 签 页 ， 可 以 看 到 在 新 建 的 实施 中 ， 系 统 自动 包含 了 两 个 方 
法 类 ， 第 一 个 适用 于 主 数据 属性 、 文 本 以 及 交易 数据 ， 第 二 个 适用 于 主 数据 层次 结构 的 增 
强 ， 如 网 4-45 所 示 。 


[= 
Implementation Edit Goto  Utiities(M) Environment 系统 (Y) 帮助 (H) 


8) s8/eaeBmE sss mo 


Business Add-In Builder: Change Implementation ZRSU5 SAPI BADI 


ЖЕ 88/1 |Т | la] [s [EM] Def. documentatn || Documentation | 


Implementation Name ZRSUS SAPI BADI Inactive 


Implementation Short Text | 对 数据 源 进行 增强 
[RSU5_SAPI_BADI 


Definition Name 


Interface name IF EX RSUS SAPI BADI 
Name of implementing class: ZCL IM RSUS SAPI BADI 


DATA TRANSFORM 
HIER TRANSFORI 


图 4-45 BAdI 增强 接口 界面 
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第 5 25. 由 于 本 例 是 主 数据 属性 ， 因 此 需要 双击 “DATA_TRANSFORM” 进入 代码 编辑 


界面 ， 如 图 4-46 所 示 。 
[= 
| Method Edit Goto Utilties(M) Environment 系统 (Y) 帮助 (H) 
ç s" 4Н eae Bam supa mg ой 
Class Builder: Class ZCL_IM_RSU5_SAPI_BADI Change 


|І fea) e] | b] | 1 e] o] ІНІСІН) | ë) @][ Pattem || Pretty Printer | | signature | | 


Method IF ЕХ RSUS SAPI BADI DATA TRANSFORM 


ШЕЕ ЕТЕ ea 


METHOD if ех гѕ=ц5 sapi раді "dat a transform. 


ENDMETHOD. 


图 4-46 DATA TRANSFORM 代码 编辑 界面 
由 于 本 方法 的 输入 和 输出 同 RSAPOO01 中 的 函数 没有 明显 的 变化 ， 因 此 代码 本 身 和 退出 


因数 相 比 也 无 太 大 变化 ， 以 下 是 示例 代码 。 

* BAdI 增强 程序 DATA_TRANSFORM 代码 

METHOD if_ex_rsu5_sapi_badi ~ data, transform. 

* 数据 定义 
DATA :l_tabix 


LIKE sy- tabix. 


жж 目标 结构 定义 
DATA lt data TYPE TABLE OF biw, 1001 ws. 


DATA ls data TYPE Ым 1001 ws. 
FIELD -SYMBOLS: «fs data > TYPE biw. 1001 ws 


жа 内 表 定 义 
ПАТА:ВЕСІМ OF ls 1001k, 
bwkey TYPE bwkey , 
bukrs TYPE bukrs, 
xbkng TYPE xbkng, 


END OF 15 1001k. 
РАТА: і 1001 k LIKE TABLE OF 15 1001k. 


CASE і datasource. 


WHEN' OPLANT ATTR . 
lt, data[ ] 2 c t data[ |. 
IF lt_datal | IS NOT INITIAL. 
* 将 TOOTK 的 内 容 放 到 内 存 缓冲 ,提高 性 能 ,避免 每 条 记录 都 去 访问 硬盘 
SELECT DISTINCT bwkey bukrs xbkng 
FROM 1001k 
INTO TABLE lt 1001 k 
FOR ALL ENTRIES IN lt. data 
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WHERE bwkey = lt. data - werks 
IF sy -subrc = 0. 
ЖЖС T DATA 中 根据 TOO1K 读 出 来 的 内 容 进行 更 
LOOP AT c t data ASSIGNING «fs data >. 


READ TABLE It. 1001k INTO Is 1001k 
WITH KEY bwkey =< fs. data > — werks. 


IF sy — subrc -0. 
«fs. data >— bukrs = ls 1001 k - bukrs. 
«fs. data > — xbkng = ls. 1001k — xbkng. 

ENDIF. 

ENDLOOP. 
ENDIF. "IF 读 取 到 Т001К 
ENDIF. " It даіа[ | IS NOT INITIAL 
WHEN OTHERS. 


ENDCASE. 


ENDMETHOD. 


执行 上 述 代码 后 ， 使 用 RSA3 数据 源 抽取 测试 工具 查看 到 数据 源 OPLANT_ATTR 抽取 到 的 
数据 ， 如 图 4-47 所 示 ， 其 中 最 后 两 列 是 我 们 添加 并 且 通 过 ВА 代码 进行 内 容 填 充 的 字段 。 


数据 源 0PLANT_ATTR 的 结果 提取 


数据 包 (记录 数 ) [h (188) aj 


IEEE TE ETE а= Pe FS EE E EIS 


Ir [smi EM 住宅 号 及 街道 邮政 信箱 | 邮政 编码 | 城市 B [са [cy [Ro [cca [城市 [рр [地 区 税务 代码 Dstch [Div.[ 地 [供应 地 区 [а Тав | 
1100  Berin Berin Rosenthaler Grenzweg 12 13156 |Berin X 01 |DE 11 1100 10 00 x 1000 
5000 Токуо Tokyo 2-45 Aomi Koto-ku 1358073 Koto-ku X JP ЈР 13 5000 10 00 5000 
CHP1 Berin Berlin. Rosenthaler Grenzweg 12 13156 Вегіп X 01 DE 11 1000 10 00 1000 
CHP2 Berlin Berlin Rosenthaler Grenzweg 12 13156 Вегіп X |01 DE |11 1000 10 00 1000 
CHP3 Berlin Вегіп Rosenthaler Grenzweg 12 13156 Вегіп X 01 DE |11 1000 10 00 1000 
R100 DCR100 Meisenweg 15 55390 Giessen 01 |DE R5 RI R100 
R101 |DCR101 MozartstraBe 22 70122 | Stuttgart 01 DE R5 R1 R100 
R110 SB Warenhaus R110 Hechtsheimerlandstrasse 12 55321 Mainz 01 |DE R1 R1 R100 
R111 5в Warenhaus R111 PfingstrosenstraBe 12 64295 | Darmstadt 01 DE RI R1 R100 
R112 SB Warenhaus R112 Jahn-Strasse 33 66432 Frankfurt 01 ПЕ RI R1 R100 
R120 Supermarkt R120 BinsenstraBe 34 69563 | Frankfurt a. Main 01 DE R2 Ri R100 
R121 Supermarkt R121 RoonstraBe 87 20253 Hamburg 01 |DE R2 R1 R100 
R300 ОС R300 17632 Desert Road 90000 105 Angeles US |US СА 001 0001 CA0011000 А5 R1 R300 
R301 DC R301 1424 16th Avenue SW 80201 Denver US US CO 001 0001 CO0000000 |R5 R1 R300 
R310 СМ Store R310 1 Wils Street 94124 бап Francisco US US CA 001 0001 CA0012000 R1 Ri R300 
R311 См Store R311 7500 Cabrilo Blvd. 90000 Los Angeles US US СА 001 0001 CA0011000 1 Ri R300 
R312 См Store R312 23199 Colins Ave 92102 бап Diego US |US СА 001 0001 СА0000000 R1 R1 R300 
R313 См Store R313 12921 LAKEVIEW DR 94601 Oakland US |US СА 001 0001 СА0000000 R1 R1 R300 
R314 СМ Store R314 12921 BOULDER CRESCENT STRE 60598 РОХ VALLEY РАС US US I 001 0001 CO0000000 R1 R1 R300 
R315 СМ Store R315 121 27TH WAY 80303 Boulder US US CO 001 0001 CO0000000 R1 R1 R300 
R316 СМ Store R316 1435 West Street 85712 Tucson US |US | AZ AZ0000000 [Rl Ri R300 
R320 Supermarket R320 2341 Speedway Bid. 85712 | Tucson US Ц5 А2 А20000000 к2 Ri R300 
RFDC Reference DC 6 refstreet 53553  refcity US US R5 R1 R300 
RFST Reference store refstreet 26 73737  refciy Us US R1 Ri R300 
$330 Sp — Postal Plant 1 SP — Postal Plant 1 Cristina di Belgioso 165 20157 | miano X W8 IT MI 1000 51 51 5330 
$331 Sp — Postal Plant 2 SP — Postal Plant 2 Via De Blasio 13 70123 Bari X |W8IIT BA 1000 51 51 5330 
5333 Postal DC 2 Torino via Reiss Romoli 44/11 10148 Torino X WS IT TO 1000 51 51 5330 
5334 Postal DC 3 Arezzo via Michelangelo 465 52100 Arezzo X |W8IIT АК 1000 51 51 5330 
5335 Postal DC 4 Napoli via Galleo Ferraris 66/M 80142 Napoli X М8 ІТ МА 1000 51 51 5330 
ZCS1 | Waldorf; DON'T USENI! Waldorf; DON'T USE! X |01 DE |04 1100 10 00 1000 


图 4-47 数据 源 抽取 测试 结果 界面 
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4.2.4 单元 小 结 


希望 对 SAP 标准 的 数据 源 或 用 户 自 定义 的 数据 源 进 行 修改 或 增强 ， 可 以 使 用 SAP Ая? 
的 用 户 出 口 进 行 ， 也 可 以 使 用 BAdI 的 方式 进行 。 从 SAP 的 战略 来 看 ， 目 前 并 没有 看 到 用 户 
出 口 要 被 BAdI 蔡 代 的 可 能 ， 因 此 现 阶段 仍然 可 以 选择 其 一 进行 增强 的 实施 。 


4.3 使 用 BTE 制作 读 增 量 的 一 般 数据 源 


4.3.1 应 用 场景 描述 


在 ЕВР 系统 提供 的 标准 数据 源 中 没有 标准 的 与 采购 申请 相关 的 数据 源 ， 通 常 的 做 法 
是 基于 EBAN 制作 一 个 一 般 数据 源 。 但 是 很 多 时 候 EBAN 数据 表 的 条 目 数 众多 ， 并 且 表 
中 也 没有 相关 的 时 间 戳 字段 用 来 进行 增 量 的 判断 ， 因 此 用 户 往往 会 采用 全 量 的 方式 进行 
数据 上 载 ， 只 是 在 数据 抽取 过 程 中 加 上 一 些 限 制 条 件 ， 以 尽量 减少 每 次 全 量 抽 取 数 据 的 
数据 量 。 其 实 ， 最 完美 的 办 法 就 是 找到 新 增 或 修改 了 的 采购 申请 ， 加 入 到 对 应 数据 源 的 
增 量 队列 即 可 。 


4.3.2 实施 步骤 详解 


以 下 是 数据 源 定 义 的 详细 步骤 和 相关 代码 。 
第 1 步 : 创建 EBAN 的 数据 库 视 图 ZEBAN, Anl 4-48 所 示 。 将 EBAN 的 所 有 字段 加 入 
到 视图 ZEBAN 中 ， 如 图 4-49 所 示 。 


ABAP Dictionary: Initial Screen 
ai | |1855 [Es ЕД 


Onm ZEBAN 


OREH 
O Typgruppe 


Or 


|62 显示 [2 вы |D өне 


4-48 新建 数 据 库 视 图 ZEBAN 


第 2 步 : 使 用 RSO2 进行 数据 源 的 创建 ， 为 了 保持 数据 源 命 名 的 一 致 性 ， 本 处 使 用 ZDS_ 
103 


字典 : 维护 视图 


ESSE E] 


数据 库 视图 ZEBAN Ez 
短文 本 采风 数据 大 结构 
Mo vew іі 7 ДҘ“5Ңр) 7 7Cf. 
Uses HATA 网 [mane neas —] 
ANDT БАН MANDT M MANDT | CLNT | SEP L- 
ANFN EBAN BANFN | 回 ВАНЕН | 口 CHAR — 10 采购 申请 编号 M 
NFPO BEAN ENEPO 回 зит О иис 5 采购 申请 的 顺 目 编号 
SART EBAN BSART 5] C CHAR | 4 采购 申请 凭证 类 型 
STYP EBAN ЕЗТҮР [Г] BSTYP | 口 CHAR 1396629] 
SAKZ EBAN BSAKZ 口 BSAKZ ДЕЛЕ іЯ 
OEKZ EBAN LOEKZ C ОЕК CHAR | ІШЕ 222 
STATU EBAN STATU C BANST | 口 CHAR | 13096G82H8IAG 
ESTKZ Бы |  ESIKZ _ | ESTRZ | 口 CHAR | евр (采购 申请 /计划 行 ) 
RGKZ БАН FRGKZ Г FRGKZ О CHAR | m 
RGZU EBAN FRGZU D CHAR | 8 版 本 状态 
RGST EBAN FRGST [=] T CHAR 2 采购 请 求 中 的 批准 第 略 
KGRP БАН ЕКСЕР ГО] EKGRP. C CHAR E Ë =l 
НАН iis ERHAN | CERNAN CHAR | rcu 
RDAT Еш ERDAT | C ABDAT | DATS 8FRAN 
FNAM EBAN ARNAN [7 ARNAN CHAR ”12 需求 者 /请 求 者 姓名 
HM EBAN (1201. (E пио 口 CHAR | — 40jx& 
ATNR EBAN MATHR C MATNR CHAR 189048 
МАТН EBAN EMATN ШЕ E CHAR “18 按照 制造 商 零 件 编号 的 物料 编号 Е 
ERKS EBAN VERKS [m] 12 CHAR | 4 工厂 m 
GORT EBAN LGORT C LGORT D CHAR | 4 库存 地 点 7 
nin xp 
14-49 数据库 视图 ZEBAN 的 字段 
мж y = Ж N 2 y г =з у 
DEMO EBAN 作为 数据 源 的 名 称 ， 如 图 4-50 所 示 。 在 数据 源 的 定制 中 ， 将 应 用 程序 组 件 层 次 


节点 指定 为 MM， 如 图 4-51 所 示 。 保 存 后 ， 选 择 数据 源 的 选择 字段 ， 这 里 选择 “采购 申请 纺 
5” “采购 申 请 的 项 目 编号 ”和 “更 改 日 期 ”作为 数据 源 的 选择 字段 ， 如 图 4-52 所 示 。 


数据 原 


© НЕ 
O 主 数据 属性 
Okt 


ZDS DEMO EBAN 


С) 


n 创建 | 2 修改 | 区 显示 | 


图 4-50 ЭТЕ ДЕЙЛ 705 DEMO EBAN 

数据 源 ZDS DEMO EBAN 
应 用 程序 组 件 ІШ 6 
调整 
对 象 状态 已 保存 

简要 措 述 采购 申请 

中 间 的 说 明 采购 申请 

长 文本 指 述 采购 申请 
从 DB 视图 中 提取 

视图 / 表 ZEBAN 

提取 结构 ZOXID30139 
Ж SAP 查询 中 提取 

信息 集 
按 功能 模块 提取 

功能 模块 

提取 结构 

4-51 指定 层次 节点 
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字段 名 短文 本 选择 隐藏 字段 转换 TEES. E] 
BANFN 采购 申请 编号 口 Г] O a 
ENFPO 采购 申请 的 项 目 编号 口 = 0 M 
BSART 采购 申请 任 证 类 型 О L] Г] П 
BSTYP та] Ll LI E Е 
BSAKZ ПЧ ИЕН ИП L1 口 O [] 
LOEKZ SE ИЕН ТЇН О 口 回 O 
STATU 采购 申请 处 理 状 态 口 口 [z] = 
ESTKZ 创建 标记 《采购 申请 /计划 行 》 口 口 口 Г 
ЕКСЕ? 批准 标识 口 口 口 = 
FRGZU 版 本 状态 口 口 ш Г] 
FRGST 采购 请 求 中 的 批准 策略 口 口 O O 
ЕКСЕР 采购 组 口 口 = П 
ERNAN Gies eA P LI 口 m m 
ERDAT EAH 口 口 Г] 
AFNAM 需求 者 /请 求 者 姓名 口 口 Г] Г] 
TXZ01 短文 本 口 口 口 Г] 
MATNR 物料 号 口 口 = O 
EMATN 按照 制造 商 零 件 编号 的 物料 编号 口 口 O [] 
VERKS шш Г] Li oO [4] 
LGORT. 库存 地 点 口 口 = = 
JPL ID 


4-52 ”新 建 数 据 源 的 选择 字段 


第 3 步 : 在 系统 中 新 建 程序 Z_CHANGE_DELTA_PROCESS， 本 程序 的 目的 是 要 修改 
ROOSOURCE 数 据 库 表 中 的 DELTA 类 型 ， 原先 为 空 ， 此 处 将 增 量 类 型 设置 为 “AIM”， 如 
图 4-53 所 示 。 


程序 Z CHANGE DELTA PROCESS D 创建 


Я 显示 2 修改 


4-53 ”新 建 程序 Z_CHANGE_DELTA_PROCESS 


程序 2_CHANGE_DELTA_PROCESS 的 代码 如 下 . 


*& * 
* & Report Z CHANGE DELTA. PROCESS 
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ж“ 

*& * 
*& * created by Martin Xie 

*& ж checked by Martin Xie 

*& * 
REPORT z change. delta, process . 

* P. DATAS 数据 源 

* P. DELTAP 数据 源 的 增 量 方式 

PARAMETERS: 


p. datas TYPE roosource - oltpsource , 
p. deltap TYPE roosource - delta. 
TABLES: 
roosource. 
DATA: 
ls roosource TYPE roosource. 
IF p datas(4) NE ZDS}. 
MESSAGE 数据 源 的 命名 规则 必须 以 ' ZDS! 开头 . TYPE E . 
ENDIF. 
SELECT SINGLE ж FROM roosource INTO 15 roosource 
WHERE oltpsource = p. datas 
AND objvers = А . 
IF sy - subre EQ 0. 
ls. roosource — delta -р deltap. 
UPDATE roosource FROM 15 roosource. 
MESSAGE 指定 数据 源 的 增 量 方式 已 被 成 功 修改 .' TYPE Т. 
ELSE. 
MESSAGE 数据 源 不 存在 ,请 再 次 确认 .' TYPE E. 
ENDIF. 


运行 程序 ， 输 入 数据 源 ZDS_DEMO_FEBAN ， 输 入 增 量 处 理 方 式 AIM， 如 图 4-54 所 示 。 


[E 
| 程序 (P) MRE EIO RAN) 帮助 (H) 
@ тан саегпми 8з її лї а оа 
修改 数据 源 的 增 量 处 理 方 式 
数据 源 ZDS DEMO EBAN 
增 里 处 理 方式 ТАШ 


4-54 输入 数据 源 和 增 量 处 理 方式 


系统 提示 ， 数 据 源 的 增 量 方式 已 被 成 功 修 改 ， 如 图 4-55 所 示 。 
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4-55 程序 运行 成 功 提示 


第 4 步 : 使 用 事务 码 FINF 找到 与 采购 申请 对 应 的 BTE 事件 的 样本 函数 。FINF 输入 参数 
界面 如 图 4-56 所 示 ， 找 到 采购 申请 ВТЕ 01000710 事件 如 图 4-57 所 示 。 


E 

ЕЖ) 编辑 (E) _ 转 到 (6) FAO мун) 

d qg e Qe Bussi eessmmog 
业务 交易 事件 : 出 版 & 预订 界面 


(ы 
e 


口 有 效 产品 事件 
只 显示 短文 本 


` 国家 代码 (150 代码 ) 
应 用 指示 器 


图 4-56  FINF 输入 参数 界面 


[= 


Lit Edi Goto Settings 系统 (Y) 帮助 (H) 
Z а E ed e P m gs ЖІК TER оа 
业务 交易 事件 : 出 版 & 预订 界面 

€J <ç 作业 构成 || Gë тж» |Ә яа B sere | | [As] er] SE] | ETE [tT] EB 


01000302 АРО 插件 : 创建 组 件 
01000303 APO 插件 : 将 比较 数据 转换 为 APO 表单 
01000305 APO 插件 : 提取 APO 相关 数据 并 发 送 
01000306 | APO 插件 : 将 所 有 创建 数据 发 送 到 APO 
01000307 APO 插件 : 将 创建 的 АТР 检查 数据 发 送 圣 
01000601 
0 APO TAI: Way 

01000730 АРОН: 采购 订单 

01000740 АРОН: 采购 订单 收 货 

01000811 APO BE: ДЕ ШЕШ Ж 

01000902 APO 插件 : 活动 

02000104 ЖИЛ: 价格 激活 


Л 


[ 4-57 ”找到 采购 申请 ВТЕ 01000710 事件 
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单 击 “ 样 本 函数 模块 ”按钮 ， 可 以 看 到 样本 函数 的 定义 ， 如 图 4-58 所 示 。 


Function Module Edit Goto Utilities(M) Environment 系统 (Y) 帮助 (H) 


2 ін eae ams ooos тт ой 


Function Builder: Initial Screen 


аз! ЕМЕШ | [ET] C] [Bb] | Reəsson... | 


Function Module SAMPLE INTERFACE 01000710 


图 4-58 采购 申请 BTE 对 应 的 函数 

单 击 “Display (显示 )” 按 钮 ， 可 以 查看 样本 函数 的 相关 接口 情况 。 可 以 看 到 在 BTE 
中 有 两 种 类 型 的 内 表 接 口 : X 表 和 了 表 ， 其 中 立 表 包含 了 修改 之 前 的 数据 记录 ，X 表 包 含 
了 修改 之 后 的 数据 记录 。 采 购 申请 ВТЕ 对 应 的 函数 代码 如 图 4-59 所 示 。 


Function Module Edit Goto Utiities(M) Environment 系统 (Y) 帮助 (H) 


7 ап eee nma Sanna m= ӨШ 


Function Builder: Display SAMPLE_INTERFACE_01000710 


Function module [SAMPLE_INTERFACE_01 000710 | Active 


S ШШЩ 


D ———————— — — 
FUNCTION SAMPLE INTERFACE 01000710. 


E 


*"*"Lokale Schnittstelle: 

ж” TABLES 

- 3 T_XEBAN STRUCTURE EBAN OPTIONAL 
ж” Т ХЕВЕМ STRUCTURE EBKN OPTIONAL 
F T_YEBAN STRUCTURE EBAN OPTIONAL 
ж” Т .YEBKN STRUCTURE EBKN OPTIONAL 


ENDFUNCTION. 


图 4-59 采购 申请 BTE 对 应 的 函数 代码 
第 5 步 : EHT -CODE FIBF 新 建 一 个 用 户 产 品 ， 并 将 产品 和 函数 进行 关联 ， 选 择 “ 产 
m — “一 个 客户 的 ” 如 图 4-60 所 示 。 


ЕЕЕ БЕЖЕ | P] [21 ОЛІ 


.… 一 个 合伙 人 的 (E) 


处 理 国 数 模块 (R) 


图 4-60 设置 一 个 客户 的 产品 
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在 产品 中 新 建 Z_DELTA ， 并 勾 选 是 否 激活 的 复 选 框 ， 说 明 要 正式 启用 该 产品 ， 如 图 4-61 
所 示 。 


Z DELTA [жї | |М | 


图 4-61 i% Z DELTA 产品 
返回 FIBF 界面 ， 选 择 “P/S 函数 模块 ”一 “一 个 客户 的 ”命令 ， 如 岁 4-62 Жж, 


E 
| 事件 (Y) 编辑 (E) #908) ЖЕ(5) FN) 系统 (Y) ABH) 


K ÉE #90 IR) A | £3 23 ЕРІ OM 
SAP 业务 框架 : MEA A жі | 


PIS 函数 模块 КО... SAP 的 一 个 应 用 程序 (O) 
”处理 函数 模块 (R) 。。， 2 PENARE) 
一 


图 4-62 设置 一 个 客户 的 P/S 函数 模块 

在 出 现 的 界面 中 ， 新 建 条 目 ， 输 入 事件 “01000710”、 产 品 “Z_DELTA” 以 及 即将 要 建 
立 的 功能 函数 ZDS_PR_DELTA_CAPTURE_01000710， 这 样 就 将 事件 、 产 品 和 函数 链接 起 来 
了 ， 如 图 4-63 所 示 。 


= 
| 表 视 图 (T) 编辑 (E) HFG) FS) 实用 程序 (U) 系统 (Y) 帮助 (H) 


© „чв eee сив апааа o 
修改 视图 每 出 版 & 预订 界面 的 客户 函数 模块 : 总 览 
2 жен ЕЕ] ЕТЕ! 


— Jisb1EI 


iB ZZEBPP_POST_IS47 
|| 01000710 Z ПЕГТА ZDS PR DBLTA CAPTURE 01000710 
| |] АС51001 YTELO1 EA-ICM YTELO1 САС5 РЕС САС51001 


|Н 4-63 指定 BTE 事件 对 应 的 产品 和 函数 模块 


第 6 步 : 新 建 函 数组 ZDS_PR 和 获取 增 量 数据 以 及 更 新 增 量 队列 的 函数 。 新 建 郴 数组 
ZDS_PR， 如 图 4-64 所 示 。 新 建 函 数 ZDS PR, WRITE TO QUEUE, И 4-65 所 示 。 新 建 


区 创建 功能 组 
函数 组 1205 PR | 
函数 组 短文 本 EESTI ] 
负责 人 员 [PAEXIE | 

v^ deis ЕЗ 


4-64 ТЕР ZDS PR 
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[E 
Function Module Edit Goto Utilties(M) Environment 系统 (Y) 帮助 (H) 


2 іп eoe ams» апав тт em 


Function Builder: Initial Screen 


as i ЕН | [ET] C [BD | Reasson... 


Function Module ZDS PR WRITE TO QUEUE 


4-65 ”新建 函数 ZDS_ PR WRITE TO QUEUE 


函数 输入 接口 设置 如 图 4-66 所 示 ， 输 出 接口 设置 如 图 4-67 所 示 ， 变 更 设置 如 图 4-68 ж, Ж 
据 表 设置 如 图 4-69 所 示 ， 例 外 设置 如 图 4-70 所 示 ， 函 数 的 接口 如 图 4-71 所 示 。 


Function Module Edit Goto Utiities(M) Environment 系统 (Y) 帮助 (H) 


2 ін бае Bap тїзї D ОФ 


Function Builder: Change ZDS PR, WRITE TO QUEUE 
ТИСЕ о Ие) | lon si | II 


图 4-66 тр A BELT EE 


[= 
Function Module Edit Goto Utilties(M) Environment 系统 (Y) 帮助 (H) 
Hd саега а Фа Ela] O A 
Function Builder: Change ZDS PR, WRITE TO QUEUE 


4-67 新 建 函 数 输出 接口 设置 
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E 


2 1E eee Bsrs «ws ГЕРІ ОПЕ 
Function Builder: Change 705 PR. WRITE TO QUEUE 
ИНСЕРТ | lr Г | Function Module Г 


ZDS PR WRITE TO QUEUE 


Function Module Edit Goto Utiities(M) Environment 系统 (Y) 帮助 (H) 


图 4-68 新 建 函 数 变 更 设置 


区 
Function Module Edit Goto Utilties(M) Environment 系统 (Y) 帮助 (H) 


8) ocea one onta mion 
Function Builder: Change ZDS PR. WRITE TO QUEUE 
ӨЛЕ е т | нё] | lr] i] |) | |] [J| Pattern || Pretty Printer || Function Module Documentation | 


ZDS PR WRITE TO QUEUE 


图 4-69 新 建 函 数 数据 表 设 置 


[= 
Function Module Edit Goto  Utiities(M) Environment 系统 (Y) 帮助 (H) 


2 ін сае gam aeos па om 


Function Builder: Change ZDS PR WRITE TO QUEUE 
Кы РД | Ee | s si | | Pretty Printer 


ZDS PR WRITE TO QUEUE Active 


图 4-70 新 建 函 数 例 外 设置 


111 


E 
| Function Module Edit Goto Utilties(M) Environment 系统 (Y) 帮助 (H) 


g "ан сае aaa soos [mm оа 


Function Builder: Change ZDS PR, WRITE TO QUEUE 
БІ [ш М5) s ШЕ ЕГІН | B GR Patten | Pretty Printer || Function Module Documentation | 


Function module |205 PR VRITE TO QUEUE Active 


x] аја] 区 1 | HE] 2210] 


FUNCTION zds, pr write to queue. 


* 
*"*"Local interface: 
ж” IMPORTING 


* REFERENCE(I DATASOURCE) TYPE  ROOSOURCE-OLTPSOURCE 
ж” TABLES 
* I T DATA OPTIONAL 


TYPE-POOLS:  sbiwa. 
DATÀ: 1 exstruct TYPE roosource-exstruct, 
l initflag TYPE roosprmsc-initstate, 


图 4-71 函数 的 接口 


函数 ZDS_PR_WRITE_TO_QUEUE 的 相关 代码 段 如 下 : 


FUNCTION zds_pr_write_to_queue. 


ж" æ" Local interface; 


ж"  [MPORTING 


ж" REFERENCE(I DATASOURCE) ТҮРЕ  ROOSOURCE - OLTPSOURCE 
*" TABLES 
ж" I T DATA OPTIONAL 


ТҮРЕ - POOLS;  sbiwa. 
DATA: |l exstruct TYPE roosource - exstruct , 
1 initflag TYPE roosprmsc - initstate , 
] subre TYPE sy - subrc, 
lr is data ТҮРЕ REF TO data, 
lr es data TYPE REF TO data, 
lr et, data TYPE REF TO data, 
] t fields TYPE sbiwa, t. fields, 
] t select TYPE sbiwa, t. select. 
FIELD - SYMBOLS: «i s data» TYPE ANY, 
«e s data» TYPE ANY, 
«e t data» TYPE STANDARD TABLE. 
+ 检查 是 否 已 经 进行 过 数据 源 的 初始 化 
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SELECT SINGLE initstate FROM roosprmsc INTO 1 initflag 
WHERE oltpsource = і datasource 
AND rlogsys NE space 
AND slogsys NE space 
AND initrnr NE space. 
* 如 果 已 经 进行 过 初始 化 , 则 进行 下 述 的 增 量 队列 填写 
IF sy - subre EQ 0 AND 1 initflag EQ X . 
* 通过 数据 源 的 参数 输入 获得 数据 源 的 抽取 结构 
SELECT SINGLE exstruct FROM roosource INTO 1. exstruct 
WHERE oltpsource = i. datasource 
AND objvers = А. 
CHECK sy – subrc = 0. 
CREATE DATA lr is data LIKE LINE OF i t data. 
ASSIGN lr is data-» * TO «i s data». 
CREATE DATA lr. es, data TYPE(l. exstruct). 
ASSIGN lr. es data -> * TO «e s data». 


CREATE DATA lr et data TYPE STANDARD TABLE OF(1 exstruct). 


ASSIGN lr et data -> * TO «e t data». 


LOOP AT i 1 data ASSIGNING «i s data >. 
CLEAR «e, s data». 


MOVE - CORRESPONDING «i s data» TO «e s data». 


INSERT «e s data» INTO TABLE «e t data». 
ENDLOOP. 


ж 调用 交易 数据 增强 函数 ,使 得 新 建 的 数据 源 也 能 进行 一 般 怕 


CALL FUNCTION' ЕХІТ ЅАРІКЅАР 001 
EXPORTING 
i datasource ті datasource 
і isource - 
i updmode =" 
TABLES 
1 t select —] t. select 
i t fields —] t fields 
c t data =<е t data» 
EXCEPTIONS 
rsap. customer exit error ES! 
OTHERS 22. 
IF sy -subre < > 0. 


增强 


MESSAGE ID sy – msgid TYPE sy — msgty NUMBER sy - msgno 


WITH sy — msgvl sy — msgv2 sy — msgv3 sy — msgv4. 
ENDIF. 
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* 向 增 量 队 列 中 写 入 需要 的 数据 
CALL FUNCTION' RSC1. TRFC QUEUE WRITE 
EXPORTING 
1 lsource -і datasource 
i no flush = X 
IMPORTING 
e subrc = ]_subrc 
TABLES 
i t, data -«e t data > 
EXCEPTIONS 
name, too long =1 
OTHERS =2. 
IF sy -subre < > 0. 
MESSAGE ID sy – msgid TYPE sy – msgty NUMBER sy - msgno 
WITH sy — msgvl sy — msgv2 sy — msgv3 sy - msgv4. 
ENDIF. 


ENDIF. 
ENDFUNCTION. 


ж ж 


ж FORM abs type to rel type * 


— 本 段 程序 的 目的 是 将 绝对 数据 类 型 转换 为 相对 数据 类 型 ----------- : 
ж 一 -> ТҮРЕ NAME ж 


FORM abs type і rel type CHANGING type. name. 
DATA junk(100) TYPE c. 
SPLIT type. name АТ \ТҮРЕ = INTO junk type. name. 
ENDFORM. "abs type to rel type 


第 7 24b. ЖЕМ ZDS PR DELTA CAPTURE 01000710, WEI 4-72 所 示 。 新 建 函 数 输 
入 接口 设置 如 图 4-73 所 示 ， 输 出 接口 设置 如 图 4-74 所 示 ， 变 更 接口 设置 如 图 4-75 所 示 ， 
数据 表 设 置 如 图 4-76 所 示 ， 例 外 设置 如 图 4-77 Бол, РА АВЕ ДІН 4-78 所 示 。 


E 


Function Module Edit Goto  Utiities(M) Environment 系统 (Y) 帮助 (H) 


ç Е з чо езе вав “тос па ou 


Function Builder: Initial Screen 


al о | ІН | [ET | Ern] [D] | Reassion-.. | 


Function Module |28 PR DELTA CAPTURE 01000710 


Фо Display | 2 Сһапде | [1 Create | 


图 4-72 ТРЕ 705 PR DELTA CAPTURE 01000710 
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Ге 
Function Module Edit Goto  Utilitie(M) Environment 系统 (Y) 帮助 (H) 


UU еае DLHE wma: rg o 


Function Builder: Change ZDS PR, DELTA CAPTURE 01000710 


«I» LIES Ier | Ыт ЕЕ | eral [NO] | [| [J| Pattern | Pretty Printer || Function Module Documentation | 


ZDS PR DELTA CAPTURE 01000710 


图 4-73 新 建 函 数 输入 接口 设置 


ЕГ 
[BG 10] 


E 
Function Module Edit Goto Utiities(M) Environment 系统 (Y) 帮助 (H) 


2 ін cea pun тй Hn oa 


Function Builder: Change 705 РН DELTA CAPTURE 01000710 
«|» eee | e] о 816 | ы) [TU С] Pattern || Pretty Printer || Function Module Documentation | 


ZDS PR DELTA CAPTURE 01000710 |Active 


|4 4-74 ”新 建 函 数 输 出 接口 设置 


Function Module Edit Goto Utilities(M) Environment 系统 (Y) 帮助 (H) 
a а тлі [ [р] @ P 


Function Module [ 


图 4-75 新 建 函 数 变更 接口 设置 
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[= 
Function Module Edit Goto Utilties(M) Environment 系统 (Y) 帮助 (H) 


7 ін eoe Bam ance mmo 


Function Builder: Change 205 PR DELTA CAPTURE 01000710 
Ell ког т | кө] | ы ШК | Patten || Pretty Printer || Function Module Documentation | 


ZDS PR DELTA CAPTURE 01000710 |Active 


шазы u WWE T нтә: 


4-76 新 建 函 数 数据 表 设 置 


Function Module Edit Goto Utiities(M) Environment 系统 (Y) 帮助 (H) 
2 іи eae BÓ muss rmm GE 
Function Builder: Change ZDS PR, DELTA CAPTURE 01000710 

ЛИ pr] НП! еъ | Pretty Printer 


ZDS PR DELTÀ CAPTURE 01000710 |Active 


图 4-77 EUM 


= 


Function Module Edit Goto  Utiities(M) Environment 系统 (Y) 帮助 (H) 


2 ін сае пив antia AA oR 


Function Builder: Change 205 PR. DELTA CAPTURE 01000710 


Function module [ZDS PR DELTA CAPTURE 01000710 | Active 


EAE I 


FUNCTION 205 pr delta capture 01000710. 


ж 


米 4 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 


*"*"Local interface: 

ж” TABLES 

" T XEBAN STRUCTURE ЕВАМ OPTIONAL 
id T XEBKN STRUCTURE ЕВКМ OPTIONAL 
Е T YEBAN STRUCTURE EBAN OPTIONAL 
М T YEBKN STRUCTURE EBKN OPTIONAL 
DATA: 

l datasource TYPE roosource-oltpsource. 


1 datasource = ° 708 DEMO ЕВА. “指定 用 户 自 定 义 数 据 源 的 名 称 


3E deer dE, 4 


图 4-78 函数 的 接口 
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函数 705 PR. DELTA. CAPTURE. 01000710 的 代码 段 如 下 : 


FUNCTION 2045. pr. delta. capture, 01000710. 


* " ж "Local interface: 


*" TABLES 
ж" T XEBAN STRUCTURE EBAN OPTIONAL 
gn T XEBKN STRUCTURE EBKN OPTIONAL 
kc T YEBAN STRUCTURE EBAN OPTIONAL 
ж" T YEBKN STRUCTURE EBKN OPTIONAL 
"E 

DATA: 


] datasource TYPE roosource - oltpsource. 


] datasource = ZDS BTE PR . "指定 用 户 自 定义 数据 源 的 名 称 


IF LINES( t_xeban[ | ) СТО. 
CALL FUNCTION' ZDS PR, WRITE TO QUEUE 


EXPORTING 
1 datasource = 1. datasource 
TABLES 
i t. data -і xeban. 
ENDIF. 
ENDFUNCTION. 


# 82b. 通过 以 上 对 于 数据 源 ZDS_DEMO_EBAN 的 设 定 后 ， 进 入 BW 系统 ， 在 数据 源 
处 理 界面 的 应 用 组 件 MM 上 单 击 鼠 标 右键 ， 在 弹出 的 快捷 菜单 中 选择 “复制 数据 源 ”选项 ， 
可 以 将 数据 源 同步 到 BW 系统 。 同 步 到 数据 源 时 ， 系 统 弹 出 对 话 框 ， 让 用 户 选 择 数据 源 的 复 
制 类 型 ， 选 中 默认 值 “ 作 为 数据 源 (RSDS)” 单 选 按 钮 ， 如 图 4-79 所 示 。 


БЕЛ х 


数据 源 (OSOA) ZDS DEMO EEAN 
不 存在 于 BI 系统 中 
您 要 如 何在 BI 中 创建 该 对 象 ? 
[© 作为 数据 淹 (8505) 

O 作为 3.x 数据 源 (ISFS) 

%||% 


4-79 BW 复制 数据 源 选 项 


同步 完毕 后 就 会 在 MM 组 件 下 面 出 现 新 的 数据 源 对 象 ZDS_DEMO_EBAN， 如 图 4-80 
所 示 。 
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[ ШЕНІ [e| & [08 | 55 ЕЗ [Em | 5 | IBI | e | s [i 


PARE. Ht IDSCLNT800 IDS 集团 800 技术 名 称 і. неве 

E 生产 作业 :计划 行 交 货 2LIS 02 SGR = IDSCLNT800 
[@ 生产 作业 :计划 行 确认 2115 02 5СМ E IDSCLNT800 
GP 货物 移动 : 工厂 2115 03 5196 ШЕ IDSCLNT800 
P sept 2115 02 5012 E IDSCLNT800 
ЕР 采购 数据 (抬头 等 级 ) 2LIS_02_HDR = IDSCLNT800 
ЕР 采购 数据 (计划 行 等 级 ) 2LIS 02 SCL = IDSCLNT800 
(P 采购 数据 (项 目 等 级 ) 2115 02 ІТМ = IDSCLNT800 
ЕР 采购 数据 (外 部 服务 ) 2LIS_02_SRV = IDSCLNT800 
г? 采购 数据 《帐户 级 别 》 2115 02 АСС E IDSCLNT800 
г? 205 BTE PR [E] ipscLNT800 
СВАКОМ; 205 DEMO EBAN — - 

b к. Z BTE PR IDSCLNTB800 
[ RHA 2LIS 02 S011 = IDSCLNT800 
ЕР 重新 评估 2LIS 03 UM = IDSCLNT800 

4-80 BW 数据 源 列 表 中 的 新 的 数据 源 对 象 


第 9 步 : 此 时 的 数据 源 出 于 未 激活 状态 ， 系 统 尚 未 分 配对 应 的 PSA 用 以 存储 数据 ， 所 
需要 进入 数据 源 修改 界面 ， 激 活 数据 源 ， 如 图 4-81 所 示 。 


ІН 


数据 源 (D) 编辑 (E) HEG) 附加 (X) 系统 (Y) ЖЕШИН) 
g зан сае вив ата 11 @ m 


ІН 630705 DEMO EBAN(IDSCLNT800) 


= а е1 | (ВЕН) 


数据 源 ШЕ |205 ЕМО ЕВАН | 采购 申请 
源 系统 IDSCLNT800 IDS 集团 800 
版 本 © | 在 处 理 中 m G 未 保存 5... a] 
活动 版 本 不 存在 
常规 属性 一 
简要 描述 采购 申请 
中 间 的 说 明 采购 申请 
长 文本 描述 采购 申请 
应 用 公司 
最 后 更 改 人 PAHXIE 和 更改 日 期 2012.08.07|/ 13:41:10 
口 数 据 同步 的 数据 源 口 数 据 与 语言 相关 
口 没 有 分 类 PSA 口 数据 维 时 间 相 关 
口 未 清 余额 
交付 复制 数据 记录 未 定义 的 B 
内 容 属 性 
内 容 版 本 类 型 IR/3| 内 容 版 本 700 


图 4-81 激活 数据 源 


第 10 步 : 激活 完毕 后 ， 在 数据 源 上 单 击 鼠 标 右键 ,在 弹出 的 快捷 菜单 中 选择 “创建 信 
息 包 ” 选 项 以 加 载 数 据 。 此 时 先 创建 一 个 初始 化 信息 包 ， 由 于 是 测试 ， 因 此 可 以 选中 “不 
含 数据 传输 的 初始 化 模拟 ” 单 选 按钮 ， 如 图 4-82 所 示 。 


118 


区 
计划 器 (C) 编辑 (E) 转 到 (6) 环境 (N) 附加 (X) 系统 (Y) 帮助 (H) 
egnade OAOA 


2 à 22-728 бө Bf 


调度 器 (维护 信息 包 ) 
EHEH Ee meer | 52 
信息 包 ZSNI:ZDS_DEMO_EBAN(ZPAK_DDENV3G0BNZKKMRX59YFDTBY) 
ЕРТ [Шин #(205 DEMO EBAN) 
数据 类 型 = 事务 数据 
图 源 系统 105 集团 800(IDSCLNT800) 
最 后 更 改 人 日 其 时 间 00:00:00 


名 提前 增 量 初 始 化 


在 源 系统 中 立即 处 理 请 求 


图 4-82 新建 信息 包 维 护 界面 


信息 包 执 行 完 毕 后 ， 回 到 ЕВР 系统 ， 通 过 事务 码 RSA7 可 以 查看 数据 源 的 增 量 队 列 ， 
其 中 可 以 看 到 ZDS_DEMO_EBAN 的 增 量 为 0， 如 图 4-83 所 示 。 


IDSCLNT812 0 


图 4-83” 增 量 队 列 查 看 界面 
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第 11 步 : 此 时 通过 事务 码 ME52N 进入 采购 申请 修改 界面 ， 修 改 采 购 申请 数量 ， 将 20 
修改 为 30， 修 改 前 和 修改 后 的 采购 申请 界面 如 图 4-84 和 图 4-85 所 示 。 


= 
采购 申请 (P) 编辑 (E) 转 到 (6) “环境 (N) 系统 (Y) 帮助 (H) 


Jieoe GHR ы ы а ін 1 @ m 


改变 采购 申请 10013693 
(DIE? ie] | i] EE |] лз | 


采购 申请 11|10013693 口 货源 确定 


г K MM-TEST 测试 物料 


图 4-85 采购 申请 修改 后 界面 


再 次 通过 事务 码 RSA7 进入 增 量 队列 查看 界面 ， 此 时 可 以 看 到 在 数据 源 ZDS_DEMO_ 
EBAN 后 多 了 一 条 数据 ， 如 图 4-86 所 示 。 通 过 查看 功能 查看 到 的 增 量 如 图 4-87 所 示 。 


= 
队列 (9) 编辑 (E) 转 到 (6) 系统 (Y) 帮助 (H) 


ZDS DEMO EBAN: IDSCLNT812 


4-86 增 量 队 列 查 看 界面 
120 


= 
| 列表 (L) 编辑 (E) 转 到 (6) ЕКІ!) 设置 (5) 系统 (Y) 帮助 (H) 
a| чотеае BHR ъан ао 


| | |&&| ЧЕ [3] i9 | Ед Ly pn а ЕВ 


XH 705 DEMO EBAN 
目标 系统 IDSCINT812 


采购 申请 。 [项 目 [ 估 证 类 [类 [cu 批准 状 | Rs| рог [авва [更 改 日 期 [misw [短文 本 “| 物料 
10013693 10 NB в N R 007 PAHXIE | 2012.08.07 pahxie 测试 物料 ММ-ТЕ5Т 1000 


4-87 ДАУД ЯН L 


o 
л 
о 
ж 
[3 


MPN 物料 | 工厂 | 库 位 [跟踪 号 | 物料 组 | 拆 分 [数量 | 单位 ЕДЕ EUR 
011 0 2012.07.16 


ME 4-87 中 可 以 看 到 ， 由 于 将 数据 源 的 增 量 类 型 改 为 了 “AIM”， 因 此 每 次 发 生变 化 后 
的 数据 情况 被 传递 到 了 增 量 队列 中 ， 因 此 本 数据 源 需 要 DSO 的 支持 ， 而 不 能 直接 更 新 到 信 
息 块 。 

通过 采用 系统 标准 BTE 事件 驱动 ， 将 变更 或 新 增 的 采购 申请 数据 通过 函数 写 人 到 增 量 
队列 ， 进 而 传输 到 BW 系统 中 ， 从 而 避免 了 传统 的 对 EBAN 表 的 全 量 读 取 和 传输 的 方法 ， 大 
大 提高 了 数据 访问 性 能 和 加 载 效率 。 


4.3.3 单元 小 结 


实际 上 ， 在 ERP 系统 中 存在 许多 业务 交易 事件 BTE， 当 执行 某 项 业务 时 ， 系 统 就 会 
触发 该 交易 事件 。 例 如 ， 对 一 个 采购 申请 或 采购 订单 进行 创建 和 修改 时 ， 就 会 触发 对 应 
的 BTE 事件 。 由 于 在 ЕВР 系统 中 存在 众多 的 BTE 事件 ， 因 此 需要 先 找 到 与 采购 申请 对 应 
的 BTE 事件 ， 并 且 在 事件 发 生 时 获取 增 量 数据 并 对 增 量 队列 进行 填充 。 

需要 说 明 的 是 ， 由 于 采集 的 是 事后 的 数据 影像 ， 因 此 数据 源 的 增 量 机 制 必须 定义 为 
ABR 或 AIM 的 方式 。 由 于 交易 和 交易 对 应 的 BTE 事件 函数 不 是 跨 集团 的 ， 因 此 如 果 有 多 个 
集团 ， 则 一 定 要 在 不 同 的 集团 都 进行 一 次 配置 。 


44 实战 经 验 分 享 一 一 如 何在 项 目 中 更 好 地 组 织 增强 接口 开发 


在 实际 的 项 目 中 ， 存 在 着 大 量 的 数据 源 需 要 增强 ， 而 且 这 些 增强 又 可 能 分 布 在 不 同 的 项 
目 小 组 中 。 如 果 对 这 些 增强 按照 项 目 组 和 数据 源 的 方式 单独 进行 处 理 ， 则 会 存在 两 个 问题 : 
第 一 ，ZXRSAU01 只 能 同时 被 一 个 人 进行 修改 ， 因 此 项 目 组 之 间 的 增强 开发 会 受到 相互 制 
约 ; 第 二 ，ZXRSAU01 每 修改 一 次 就 面临 一 次 传输 ， 如 果 多 个 项 目 组 之 间 都 进行 开发 ， 则 传 
输 的 先后 顺序 就 需要 在 管理 上 进行 严格 的 保证 。 

为 了 解决 以 上 问题 ， 通 过 实际 项 目的 经 验 总 结 ， 有 以 下 3 种 办 法 供 读者 参考 使 用 。 

方法 一 : 一 次 性 地 在 ZXRSAUOI 中 按照 项 目 组 的 方式 新 建 各 自 不 同 的 函数 模块 ， 这 样 
ZXRSAU01 将 只 传输 一 次 ， 并 且 后 续 不 再 需要 进行 传输 ， 除 非 有 新 的 项 目 组 需要 。 项 目 组 所 
有 的 修改 都 基于 自己 项 目 组 的 函数 。 例 如 ,在 ZXRSAUOI 中 增加 项 目 组 各 自 的 代码 ， 代 码 
段 如 下 。 
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ЖЖЖ ЖЖ ЖЖ ЖЖ ЖЕЖ ЖЕЖ ЖЖ ЖЖ ЖЖЖ Ж ЖЖ ЖЖ ЖЖЖ 


«за ------- 项 目 组 1 的 专用 函数 开始 


ЖЖЖ ЖЖ ЖЖ Ж ЖЖ ЖЖ ЖЖ Ж ЖЖЖ ЖЖЖ Ж ЖЖ ЖЖ ЖЖЖ kK k kK K 


CALL FUNCTION Z PROJI, EXIT 


EXPORTING 

I DATASOURCE =1 DATASOURCE 

I ISOURCE -І ISOURCE 

I UPDMODE = 1 UPDMODE 
TABLES 

I T SELECT -] T SELECT 

I T FIELDS =1 T FIELDS 

C T DATA -С T DATA 

С T MESSAGES -С T MESSAGES 
EXCEPTIONS 

RSAP. CUSTOMER, EXIT ERROR =1 

OTHERS =2; 


IF SY - SUBRC < > 0. 


MESSAGE ID SY - MSGID TYPE SY ~ MSGTY NUMBER SY – MSGNO 
WITH SY - MSGVI SY - MSGV2 SY - MSGV3 SY - MSGVA. 


ENDIF. 


ЖЖЖ ЖЖ ЖЖ ЖЖЖ Ж Ж ЖЖ ЖЖЖ ЖЖ Ж ЖЖЖ Ж ЖЖ ЖЖ ЖЖЖ жж 


жжж 一 一 一 一 一 一 一 项 目 组 1 的 专用 函数 结 


FK +k +k +K Ж ЖЖЖ ЖЖЖ Ж ЖЖЖ ЖЖ ЖЖ ЖЖ ЖЖЖ ЖЖ ЖЖ ЖЖЖ ж 


ЖЖЖ Ж ЖЖЖ ЖЖЖ ЖЖ ЖЖ ЖЖ ЖЖЖ ЖЖЖ Ж ЖЖЖ Ж ЖЖ ЖЕ ж 


iid 项 目 组 2 的 专用 函数 开始 


ЖЖЖ Ж ЖЖ ЖЖЖ ЖЖ ЖЖ ЖЖЖ ЖЖ ЖЖ ЖЖ ЖЖЖ ЖЖ ЖЖЖ ж 


CALL FUNCTION' Z PROJ2 EXIT 


EXPORTING 

I DATASOURCE = І DATASOURCE 

I ISOURCE -І ISOURCE 

I UPDMODE = 1 UPDMODE 
TABLES 

I T SELECT =1 T SELECT 

I T FIELDS =1 T FIELDS 

C T DATA -С T DATA 

С Т MESSAGES -С T MESSAGES 
EXCEPTIONS 

RSAP. CUSTOMER, EXIT ERROR =1 

OTHERS 22. 
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IF SY - SUBRC < > 0. 
MESSAGE ID SY - MSGID TYPE SY – MSGTY NUMBER SY – MSGNO 
WITH SY - MSGVI SY - MSGV2 SY - MSGV3 SY - MSGVA. 


ENDIF. 
ÞK +k +K +K cR cR cR cR CK ЖЕ ЖЕ CK cR ch cB cR CK CK CK CK CK CR CR CK CK cR ch cR ch CK CK CK CK CK CK cR CR CK CK ck ch ch cR ck CK CR CR cR ch ch cho ck 
т naci iui 项 目 组 2 的 专用 函数 结束 ------ кая 


3K +k +k +K Ж ЖЖ Ж ЖЖЖ Ж ЖЖ ЖЖ Ж ЖЖ ЖЖ ЖЖ ЖЖ Ж Ж ЖЖ ЖЖ ЖЖЖ 


方法 二 : 在 ZXRSAUOI 中 加 入 一 段 用 户 自 定义 代码 ， 这 段 代码 本 身 没 有 任何 数据 处 理 
的 逻辑 ， 但 是 却 可 以 通过 L_ DATASOURCE 参数 动态 地 调用 每 个 数据 源 对 应 的 增强 函数 。 这 
种 方法 首先 必须 要 为 数据 源 的 增强 新 建 函 数组 和 函数 ， 这 里 新 建 函 数组 Z_DS， 并 为 每 个 数 
据 源 的 增强 新 建 函 数 Z_DS_ < 数据 源 技术 名 称 > 。 在 ZXRSAU01 中 加 入 灵活 调用 函数 的 语句 
的 代码 段 如 下 。 


DATA :1 а fname(30) TYPE c. 
x 根据 数据 源 的 名 称 找到 对 应 函数 组 Z_DS "P SC А or PKI 
CONCATENATE' Z DS' i datasource(25) INTO 1 d. ате. 


TRY. 
CALL FUNCTION 1 d. ате 
EXPORTING 
i datasource ші datasource 
1 isource ші isource 
i updmode ті updmode 
TABLES 
i t select —i t select 
i t fields —i t fields 
c. t. data = сі data 
c L messages -c i messages 
EXCEPTIONS 


rsap. customer exit error ES! 
OTHERS =2; 
IF sy -subre < > 0. 
RAISE rsap. customer exit, error. 


ENDIF. 


CATCH сх sy. dyn call illegal func. 


ж 


ENDTRY. 


实际 上 ， 当 数据 源 708 DEMO TCURR 调用 增强 ZXRSAUOI 时 ， 系 统 就 会 自动 调用 数 
据 源 本 身 的 功能 函数 Z_DS_ZDS_DEMO_TCURR， 从 而 达到 灵活 调用 的 目的 。 
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方法 三 : 同方 法 二 一 样 ， 本 方法 也 是 在 ZXRSAU01 中 加 入 一 段 用 户 自 定义 代码 ， 但 
是 用 户 可 以 使 用 可 执行 程序 ， 而 不 是 使 用 函数 的 方式 ， 这 样 做 的 好 处 是 不 用 新 建 函 数组 
进行 管理 ， 但 是 笔者 更 加 推荐 使 用 函数 组 进行 管理 的 方式 。 这 里 需要 在 ZXRSAUOI 加 入 
灵活 调用 可 执行 程序 的 语句 ， 代 码 段 如 下 。 


* 定义 每 个 数据 源 的 可 执行 程序 的 本 地 变量 
DATA :l_prog_name LIKE trdir ~ name. 
ж -一 假设 ZBWI_ 是 可 执行 程序 的 命名 前 级 
CONCATENATE ZBWI' i datasource INTO 1, prog name. 
ж 一 一 如 果 能 找到 可 执行 程序 , 则 进行 程序 调用 
PERFORM execute, user, exit IN PROGRAM(1_prog_name) 
TABLES i t select 
i t fields 


ij t data 


1 t messages 


IF FOUND. 


如 需要 在 SE38 新 建 一 个 以 ZBWI 开头 进行 命名 的 可 执行 程序 ， 并 在 其 中 定义 一 个 
FORM 供 ZXRSAU01 的 代码 调用 ， 可 执行 程序 ZBWL OMATERIAL, ATTR 的 代码 如 下 : 


*& * 
* & Report ZBWI OMATERIAL ATTR 
*& * 


REPORT zbwi, Omaterial, attr. 
ж 一 一 一 数据 源 ОМАТЕНІЛІ, ATTR 的 增强 函数 
TYPE - POOLS:sbiwa. " Mandatory for typecasting 


*& * 
* & FORM 开始 USER EXIT 
*& * 


FORM execute, user. exit 

TABLES 1 t select TYPE sbiwa, t. select 

1 t fields TYPE sbiwa t fields 

c. t. data STRUCTURE Бім mara, s "数据 源 的 结构 

c t messages STRUCTURE balmi. 

* -如 果 有 需要 ,在 此 申明 全 局 变量 ------------ š 

* -- 如 果 有 需要 ,在 此 申明 局 部 变量 ---------- 

LOOP AT c t data. 

* -一 从 透明 表 MARA 读 取 分 类 清单 类 型 
SELECT SINGLE bbtyp 
INTO c t data — zzbbtyp 
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FROM mara 


WHERE matnr = c, t. data – matnr. 


IF sy - subrc = 0. 
MODIFY c t. data. 
ENDIF. 
ENDLOOP. 
ENDFORM. " start, user. exit 


125 


第 5 章 数据 上 载 过 程 中 的 功能 增强 


在 上 一 章 中 ， 我 们 对 ERP 系统 中 有 关 数 据 源 的 制作 和 增强 涉及 的 АВАР 处 理 的 相关 内 
容 进行 了 介绍 ， 本 章 将 讨论 在 BW 系统 数据 上 载 过 程 中 的 АВАР 代码 处 理 。 实 际 上 ， 在 真正 
项 目 设计 中 ， 虽 然 有 一 些 代码 是 在 ЕВР 端 进行 编写 ， 但 是 大 部 分 的 数据 清洗 和 转换 处 理 
还 是 在 BW 系统 中 进行 的 ， 其 中 主要 包括 从 数据 源 一 直到 信息 块 的 整个 数据 流 流向 过 程 中 的 
ABAP 处 理 。 

在 BW 3.X 中 ， 能 够 进行 ABAP 例 程 编写 的 地 方 包括 文本 文件 上 载 数 据 源 的 信息 包 、 
文件 名 称 / 特 性 选择 条 件 例 程 编 写 、 传 输 规 则 中 的 开始 例 程 / 信 息 对 象 例 程 编写 、 更 新 规 
则 中 的 开始 例 程 编写 、 特 性 和 关键 指标 的 例 程 编写 、 单 位 例 程 编写 以 及 返回 表 的 例 程 
编写 。 

从 BW 7.0 开始 ，SAP 推出 了 新 的 数据 流 处 理 逻 辑 ， 即 数据 可 以 在 BW 系统 中 通过 转换 
和 数据 传输 进程 (Data Transfer Process, EK DTP) 的 方式 在 任意 两 个 对 象 之 间 直 接 流转 ， 
而 不 像 之 前 BW 3. X 那样， 数据 源 必 须 通过 信息 源 ， 然 后 才能 向 上 更 新 到 数据 目标 中 。 但 是 
同时 ，BW 也 向 下 兼容 传输 规则 和 更 新 规则 ， 因 此 本 章 先 对 转换 和 DTP 的 АВАР 增强 进行 剖 
析 ， 在 最 后 的 两 节 对 BW 3. X 的 传输 规则 和 更 新 规则 进行 简要 介绍 。 


= 


5.1 信息 包 中 的 增强 实施 


5.1.1 应 用 场景 描述 


用 户 每 次 都 将 文本 文件 通过 FTP 的 方式 传输 到 BW 服务 器 上 以 实现 每 月 手工 数据 的 自 
动 上 载 ， 但 是 文本 文件 的 文件 名 随 着 时 间 的 变化 而 变化 ， 如 文件 名 “财务 数据 _YYMMDD ” , 
这 就 需要 系统 随 着 时 间 的 变化 自动 识别 文件 名 。 而 同时 文件 内 容 的 重复 会 导致 财务 数据 的 重 
复 上 载 ， 如 有 些 月 份 可 能 上 载 了 本 年 全 年 的 数据 ， 用 户 希 望 系统 能 够 对 包含 的 数据 进行 选择 
性 上 载 ， 只 上 载 指定 月 份 的 数据 ， 通 常 是 指 上 月 的 数据 。 


5.1.2. 文件 名 的 动态 选择 


使 用 例 程 编写 文件 名 称 的 目的 是 为 了 系统 能 够 灵活 地 选择 文件 名 称 ， 特 别 是 当 将 文件 放 
到 服务 器 的 目录 ， 且 每 天 都 有 新 的 文件 时 ， 我 们 每 天 给 文件 一 个 新 的 名 字 ， 这 样 就 需要 对 文 
件 的 名 称 进行 动态 选择 。 

在 文本 文件 数据 源 的 信息 包 中 进行 文件 的 选择 , 在 BW3.X 和 BW7.X 的 创建 地 点 不 太 
一 样 。 在 BW 3. X 中 ， 给 信息 源 分 配 数据 源 后 ， 即 可 在 数据 源 下 新 建 信息 包 。 在 BW 7.X 
中 ,信息 包 的 “提取 ”标签 页 中 的 参数 都 是 从 数据 源 自动 传递 过 来 的 ， 因 此 例 程 的 实施 只 
要 在 数据 源 定 义 的 时 候 定义 “提取 ”标签 页 中 的 “文件 名 称 ” 即 可 。 由 于 BW 3.X 和 BW 
7. X 的 逻辑 以 及 ABAP 代码 本 身 并 没有 太 大 区 别 ， 因 此 本 书 以 BW 7. X 中 的 场景 为 例 进 行 
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说 明 。 

为 了 在 信息 包 中 使 用 例 程 来 确定 文件 名 称 ， 需 要 按照 以 下 步骤 进行 创建 。 

第 1 步 : 在 创建 数据 源 时 ， 进 入 “提取 ”标签 页 ， 这 时 在 文件 名 称 后 面 可 以 看 到 一 个 
例 程 的 图 标 图 ， 如 图 5-1 所 示 。 


malis: EE EE 


增 里 处 理 完全 上 载 ( 仅 信息 包 选择 的 增 量 ) EE] 
直接 访问 ”没有 人 允许 直 接 访 问 的 数据 传输 协议 ET 
实时 不 支持 实时 数据 获得 ET 
适配器 从 本 地 工作 站 中 装载 文本 类 型 文件 I afe 属性 
文件 名 称 | o | _ ЕСЕ 
要 忽略 的 抬头 行 к 2 = 
字符 集 设置 Егін E 
系统 代码 页 4102 UTF-16BE Unicode / ISO/IEC 10646 
数据 格式 固定 长 度 Е] 
转换 语言 用 户主 记录 E 
数字 格式 O | 用 户主 记录 ET 


图 5-1 数据 源 的 提取 标签 


第 2 步 : 单 击 文件 名 称 后 面 的 创建 文件 名 称 的 例 程 图 标 图 ， 在 弹出 的 对 话 框 中 输入 描 
述 ， 这 里 输入 “根据 日 期 自动 确定 文件 名 ”， 如 图 5-2 所 示 。 


[cr BI ж: 创建 例 程 
名 称 | 根据 日 期 自动 确定 文件 名 


[v^ жен |х] 


Kd 5-2 例 程 文本 描述 输入 


第 3 步 : 在 出 现 的 例 程 编辑 界面 进行 文件 名 称 的 例 程 编辑 ， 代 码 段 如 下 。 


PROGRAM filename, routine. 

* Global code 

ж $*$ begin of global — insert your declaration only below this line ж-ж 
* Enter here global variables and type declarations 

* as well as additional form routines , which you may call from the 

* main routine COMPUTE FLAT FILE FILENAME below 

* TABLES:... 

* DATA: 


ж $*$ end of global — insert your declaration only before this line ж-ж 


* 


FORM compute, flat. file filename 
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USING p.infopackage TYPE rslogdpid 


p.datasource ТҮРЕ rsoltpsourcer 


p. logsys TYPE rsslogsys 
CHANGING р filename TYPE rsfilenm 
p. subre LIKE sy - subre. 
ж $*$ begin of routine — insert your code only below this line * — * 


* This routine will be called by the adapter, 
* when the infopackage is executed. 
* 文件 名 称 是 数据 源 名 称 +“_ НАЯ” 
CONCATENATE 51300503, sy – datum . CSV INTO р filename. 


p. subrc -0. 
ж $*$ end of routine. — insert your code only before this line ж-ж 
ENDFORM. " compute. flat. file filename 


5.1.3 特性 选择 条 件 的 动态 实施 


根据 信息 包 进 行 数据 上 载 时 可 能 出 于 业务 需要 或 系统 性 能 的 考虑 ， 需 要 对 信息 包 中 的 特 
性 选择 条 件 进行 手工 限制 。 例 如 ， 在 ЕВР 系统 中 建立 了 一 个 全 量 抽取 的 数据 源 ， 但 是 我 们 
可 能 希望 每 次 抽取 与 上 月 、 本 月 、 下 月 相关 的 数据 到 BW 系统 中 ， 一 方面 业务 上 有 这 样 的 需 
要 ， 另 一 方面 也 是 降低 系统 之 间 数 据 的 传输 ， 提 高 数据 上 载 过 程 中 的 系统 性 能 。 

为 了 在 信息 包 中 使 用 例 程 来 确定 特性 的 选择 条 件 ， 需 要 按照 以 下 步骤 进行 例 程 的 创建 
(本 处 以 之 前 新 建 的 采购 申请 的 数据 源 为 例 ) 。 

第 1 步 : 在 信息 包 的 “数据 选择 ”标签 页 ， 找 到 需要 进行 选择 的 字段 ， 这 里 选择 “ 需 
求 〈 请 求 ) 日 期 ”作为 选择 条 件 ， 如 图 5-3 所 示 。 


数据 选择 


从 源 系 统 加 载 事务 数据 


信息 对 象 。 | 源 系 统 中 的 技 [s 以 值 [sg е | 类 . bem vue. (ана [нет анана 
ENS 采购 申请 编号 [ei CHAR | 10 HE 
ENFPO 采购 申请 的 项 目 编号 =l omc 5 
BADAT ЖЖС EM | ік DATS 8 
15-3 数据 源 的 选择 界面 
第 2 步 : 在 需要 进行 选择 的 字段 后 面 的 “类 型 ”字段 输入 “6”， 表 明 需 要 对 该 字段 进 
17 АВАР 例 程 增强 选择 条 件 ， 如 图 5-4 所 示 。 


数据 选择 


从 源 系统 加 载 事务 数据 

| esus |дене s Ма ma s | 类 .| 类 型 (以 后 对. har. [tere Den 

|| EANFN ”采购 申请 编号 | " CHAR 10 SED | 
BNFPO ”采购 申请 的 项 目 编号 NUNC 5. 
ВАРАТ 需求 (请 求 ) 日 其 в | DATS 8 | 


5-4 在 BADAT 字 段 选 择 “ 类 型 ”字段 并 输入 “6” 
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输入 “6” 后 ， 系 统 会 弹出 对 话 框 提示 输入 例 程 的 文本 描述 ， 
月 、 下 月 的 数据 ” WE 5-5 所 示 。 


这 里 输入 “获取 上 月 、 本 


[EHAS -选择 例 程 : 创建 例 程 
名 称 获取 上 月 、 本 月 、 下 月 的 数据 


5 


5-5 例 程 文本 描述 输入 
第 3 步 : 单 击 “编辑 器 ”按钮 即 可 进入 例 程 的 编辑 界面 ， 系 统 自动 产生 的 代码 如 下 : 


program conversion, routine. 

ж Туре pools used by conversion program 
type — pools ; rsarc , rsarr , rssm. 

tables : rssdlrange. 


* Global code used by conversion rules 


ж $*$ begin of global — insert your declaration only below this line ж-ж 
ж TABLES:... 

* DATA: 

ж $*$ end of global — insert your declaration only before this line ж-ж 
* 

* InfoObject = 

* Fieldname = BADAT 

* data type - DATS 

* length - 000008 

* convexit - 

* 


form compute BADAT 
tables ] t range structure rssdlrange 


using p.infopackage type rslogdpid 


p. fieldname type rsfnm 
changing p. subrc like sy — subrc. 
* Insert source code to current selection field 


ж $*$ begin of routine — insert your code only below this line 
data;l idx like sy — tabix. 
read table l t range with key 
fieldname 2 BADAT . 
1 idx = sy – tabix. 


modify 1. t. range index 1 іх. 
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p. subre = 0. 


ж $*$ end of routine. — insert your code only before this line ж-ж 


endform. " 


在 代码 段 中 可 以 看 到 该 代码 段 的 相关 接口 。 其 中 ，L_T_RANGE 包含 了 所 有 的 选择 条 
件 ， 因 此 需要 做 出 限制 或 更 改 的 就 是 这 个 内 表 ; 参数 P_SUBRC 必须 被 赋值 为 0， 否 则 系统 
将 会 取消 该 信息 包 的 运行 ， 因 为 这 会 被 系统 认为 有 参数 丢失 。 在 表 L_T_RANGE 中 ， 必 须 给 
表格 字段 FIELDNAME 以 及 相关 的 RANGES. (包含 字段 SIGN, OPTION, LOW 和 HIGH) 
赋值 。 

值得 说 明 的 是 ， 对 于 BCT 业务 目录 或 ERP 系统 传输 过 来 的 字段 中 包含 的 特性 ，FIELD- 
NAME 只 需 去 掉 前 面 的 “0” 或 使 用 ЕВР 字段 名 即 可 ， 如 果 是 用 户 自 定义 的 特性 ， 则 
FIELDNAME 必须 在 特性 前 面 加 上 前 级 “/BIC/”。 例 如， 公司 代码 如 果 是 业务 目录 的 特性 
0COMP_CODE， 则 FIELDNAME 应 该 赋值 COMP_CODE 或 ЕВР 中 的 字段 名 BUKRS; 如 果 是 
自 定义 GSDM， 则 FIELDNAME 应 该 赋值 /BIC/CSDM。 

言 息 包 中 特性 选择 的 АВАР 例 程 增强 实施 ， 代 码 段 如 下 。 


program conversion, routine. 
ж Туре pools used by conversion program 
type — pools ; rsarc , rsarr , rssm. 
tables : rssdlrange. 
* Global code used by conversion rules 
ж $*$ begin of global — insert your declaration only below this line ж-ж 
ж TABLES:... 
DATA :l yearl (4) TYPE n, 
] month1 (2) TYPE n, 
] datel TYPE sy — datum, 
] year2(4) TYPE n, 
] month2(2) TYPE n, 
] date2 TYPE ву- datum. 


* DATA: 


ж $*$ end of global — insert your declaration only before this line ж-ж 


ж 


ж InfoObject = 

* Fieldname = BADAT 
ж data type - DATS 

* length - 000008 
* convexit = 
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ж 


form compute BADAT 


tables ] t. range structure rssdlrange 
using p.infopackage type rslogdpid 
p. fieldname type rsfnm 
changing p. subre like sy — subrc. 
* Insert source code to current selection field 


ж $*$ begin of routine — insert your code only below this line 
DATA:1 idx LIKE sy - tabix. 
READ TABLE 1 t range WITH KEY 
fieldname 2 BADAT . 
1 idx = sy - tabix. 
* 确定 时 间 选 择 的 下 限 
CLEAR :1 datel,l date2. 


1 year] = sy – datum(4). 
] month] = sy – datum +4(2). 


IF 1 month] 2 01 . 

1 month] = 12 . 

1 yearl 21 yearl - 1. 
ELSE. 

1 топі 21 monthl - 1. 
ENDIF. 


] datel (4) =1 yearl. 
] datel +4(2) =1 monthl. 
] datel +6(2) = 01 . 

ж 确定 时 间 选 择 的 上 限 
l_year2 = sy - datum(4). 


] month2 = sy – datum +4(2). 


IF 1 month2 = 12 . 
] month2 2 02 . "下 下 个 月 
1_уеат2 = 1 уеа2 + 1. 

ELSEIF | month2 = 11 . 


1 month22 01 . "下 下 个 月 
1_уеат2 2l yeai2 + 1. 
ELSE. 


1 month2 21 month2 + 2. "下 下 个 月 
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ENDIF. 
ж 一 一 先 获取 下 下 个 月 1 号 
] date2(4) =1_уеаг2. 
] date2 +4(2) 21 month2. 
] dat2 +6(2) = 01. 
ж 一 一 通过 下 下 个 月 1 号 减 去 1 天 得 到 下 月 的 最 后 一 天 
] date2 =]_date2 - 1. 


] t range — low =1 datel. 


] t range — high 21. date2. 


MODIFY 1 t. range INDEX 1 idx. 


p. subrc -0. 


ж $*$ end of routine. — insert your code only before this line ж-ж 


endform. " 


5.1.4 单元 小 结 


通过 对 信息 包 中 文件 名 称 的 动态 指定 以 及 选择 条 件 的 动态 值 设 定 ， 可 以 最 大 限度 地 减少 
在 系统 自动 运行 过 程 中 的 人 工 参与 量 , 保证 了 系统 运行 的 顺畅 和 高 性 能 。 


5.2 转换 中 的 ABAP 增强 实施 


5.2.1 应 用 场景 描述 


对 于 原始 系统 抽取 上 来 的 数据 ， 用 户 有 如 下 需求 : 

1) 不 需要 2010 年 以 前 的 数据 。 

2) 系统 自动 根据 交易 数据 中 的 物料 编码 推导 出 物料 组 ， 具体 规则 是 先 获得 物料 编 
码 的 前 6 位 ， 然 后 在 前 面 加 上 前 级 “MG_”， 以 满足 用 户 对 于 “物料 组 ”维度 的 分 析 
需求 。 

3) 原始 数据 中 没有 销售 价格 ， 只 有 销售 数量 和 销售 金额 ， 需 要 系统 自动 计算 每 次 交易 
的 销售 价格 。 


5.2.2 转换 中 的 增强 实现 详解 


TE BW 7. X 中， 转换 可 以 在 任意 的 数据 源 和 数据 目标 之 间 建 立 联 系 ， 并 且 进 行 数据 的 
清洗 和 人 处理， 同时 我 们 能 在 系统 中 通过 图 形 化 的 方式 来 展现 转换 的 人 处理 过 程 ， 如 图 5-6 
所 示 。 
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[= 
| 转换 [T) 编辑 (E) EG) 附加 (X) 系统 (Y) 帮助 (H) 
g a l2agjiedg e!) @ Gna nA aA 


转换 更 改 
ЕР= | [s JR] [D mee ШІ [EY 结束 程 记 8] 
转换 |RSDS SINODS01 PC FILE -> CUBE SINOCO1 
来 源 ЕР SINO 数 据 源 01 (SINODSO1) 
目标 Ө SINO 信息 块 01 (SINOCO1) 
版 本 口 | 激活 的 a|) © гез 
活动 版 本 [Ж] 可 执行 的 = 编辑 的 版 本 
z[&[&[ 10% “|Н | P [t3] mima | Tawa | Елі |Бнлі | EZ [7] 18] 
Г? =тмо 1 #01 (SINODS01) 
= ЕК ii 
1| |BIC/GOGSDM | 公司 代码 一 一 
2| (сауға 上 日 历年 —— — B 
3 | |JBIC/KOXSSL (ann ——— = Да теле 
4| (шп 计 蛙 的 单位 в [= kose |4| |koxsE нЕ 
s| ское “销售 金额 РТ” X KoxsJ6 |7 [kose д | 销售 价格 
6 | [currency | 货币 


[本 loroGsYs | 8 jg loLoGsYs Д | 源 系统 


图 5-6 BW 7.X 中 的 转换 


在 图 5-7 的 抬头 部 分 可 以 看 到 数据 的 来 源 和 目标 、 该 转换 当前 的 版 本 状态 信息 ， 以 及 
转换 本 里 是 否 处 于 可 执行 状态 。 在 抬头 的 下 面 ， 左 边 显示 的 是 数据 来 源 的 数据 结构 ， 右 边 显 
示 的 是 规则 组 。 规 则 组 对 应 数据 目标 的 结构 ，BW 用 不 同 的 规则 组 ， 以 使 同样 一 条 数据 可 以 


在 数据 目标 中 产生 多 条 数据 。 图 中 的 箭头 直观 地 展示 出 数据 来 源 字 段 到 数据 目标 字段 之 间 的 
映射 关系 。 


在 转换 中 ， 包 含 了 以 下 5 种 类 型 的 АВАР 例 程 : 
CD 特性 的 例 程 

Q 关键 指标 的 例 程 

© 开始 例 程 

(4) 结束 例 程 

@ 专家 例 程 


其 中 ， 专 家 例 程 将 完 完全 全 地 使 用 代码 的 方式 对 数据 来 源 和 数据 目标 之 间 的 逻辑 进行 处 
理 ， 结 束 例 程 是 BW 7.0 之 后 新 增加 的 一 类 АВАР 例 程 ， 下 面 将 分 别 对 各 种 类 型 的 例 程 进行 
逐一 讲解 。 

1. 特性 的 例 程 


对 特性 的 АВАР 处 理 是 在 BW 系统 中 最 为 简单 的 处 理 方式 ， 因 为 在 特性 处 理 过 程 中 涉及 
的 参数 最 少 。 同 时 ， 这 种 处 理 方式 又 是 最 为 常见 的 ， 在 很 多 场景 下 都 能 见 到 它 的 身影 ， 如 需 
要 根据 物料 的 前 几 位 取得 物料 组 ; 需要 根据 日 期 获得 会 计 期 间 ， 或 通过 会 计 期 间 获 得 年 度 和 
月 份 ; 需要 根据 数据 源 获 得 源 系 统 的 相关 信息 等 。 

要 创建 一 个 对 于 特性 的 АВАР 例 程 处 理 ， 需 要 按照 以 下 步骤 进行 。 

第 1 步 : 在 目标 规则 组 上 双击 某 个 特性 ， 如 这 里 双击 GOWL - 物料 组 ， 系 统 会 弹出 
“规则 明细 ”对 话 框 ， 如 图 5-7 所 示 。 
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区 规则 明细 


ж [СЕИ = | 
目标 信息 对 象 Æ coz | 物料 组 
规则 类 型 [E] алмаз a] 
规则 的 源 字段 ; 
KIBENA] 
DE куха DC TNESAEC WII EDI NES: S 
规 由 的 目标 字段 : 
[e] [a waa] l 


长 文本 描述 


GOWLZ ДЗ 物料 组 CHAR | 6 


КЕИДЕ |Ева БЕЗ 


图 5-7 “规则 明细 ”对 话 框 之 特性 的 例 程 


在 该 对 话 框 中 ， 必 须 先 判断 是 否 需 要 向 源 字段 中 增加 数据 派生 的 来 源 字段 ， 因 为 这 里 的 
物料 组 是 根据 物料 前 6 位 计算 得 到 的 ， 因 此 单 击 添加 源 字段 图 标 贺 ， 增 加 物料 作为 源 字段 。 
如 果 没 有 分 配 任何 的 来 源 字段 ， 则 系统 会 提示 如 图 5-8 所 示 的 信息 。 


区 没有 源 字段 


Ө 没有 分 配 的 源 字段 


图 $-8 系统 提示 信息 


第 2 步 : 指定 “规则 类 型 ”为 “ 例 程 ”， 如 图 5-9 所 示 。 


ЕЛ 
描述 Е | 
目标 信息 对 象 Æ сот | 物料 组 
规则 类 型 _ IPT 1 [2 
规则 的 源 字 段 : 
а] SANE аа] 
[BIC/GOWL 物料 CHAR 18 
规则 的 目标 字段 : 
KISENA 


信息 对 象 图 
GOWLZ AB 物料 组 CHAR 6 


ЕДЕ |Ева ЕДЕЗ 


РА] 


5-9 指定 规则 类 型 
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此 时 ， 系 统 将 自动 进入 例 程 的 编辑 界面 ， 特 性 例 程 的 接口 如 下 : 
CD 输入 参数 


REQUEST 请 求 号 
DATAPAKID 数据 包 号 
SOURCE. FIELDS 数据 源 字段 


(2 输出 参数 


MONITOR 消息 监控 器 
RESULT 目标 结果 
CURRENCY 目标 货币 
UNIT 目标 单位 


@ 例外 


CX. RSROUT 5КІР RECORD 跳 过 一 条 记录 
CX_RSROUT_ABORT 跳 过 数据 包 处 理 


第 3 步 : 进入 例 程 的 编辑 界面 后 ， 即 可 在 例 程 编辑 界面 进行 ABAP 例 程 的 编写 ， 特 性 增 
强 的 АВАР 例 程 代码 段 如 下 。 


PROGRAM trans_routine. 


ж ж 
* CLASS routine DEFINITION 

* * 
* 

* ж 


CLASS 1с] transform DEFINITION. 
PUBLIC SECTION. 


* — Attributs 
DATA: 
p. check, master. data exist 


TYPE rsodsocheckonly READ — ONLY, 


ж- Instance for getting request runtime attributs; 
* Available information; Refer to methods of 
* interface! if rsbk request, admintab. view 


p. r request 
TYPE REF TO if rsbk request admintab view READ - ONLY. 


PRIVATE SECTION. 
TYPE - POOLS :rsd ,rstr. 
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* Rule specific types 


TYPES: 
BEGIN OF ty s sc 1, 
* Field;/ BIC/GOWL 物料 . 
/ bic/g0wl TYPE c LENGTH 18, 
* Field; RECORD. 
record TYPE rsarecord , 
END ОҒ ty s sc I. 
TYPES: 
BEGIN OF ty s tg 1, 
* InfoObject : GOWLZ 物料 组 . 
/bic/ gOwlz TYPE/ bic/oigOwlz , 


END ОҒ ty s tg 1. 


ж $*$ begin of global — insert your declaration only below this line 


. "insert your code here 


ж $*$ end of global — insert your declaration only before this line ж-ж 


METHODS 
compute. g0wlz 
IMPORTING 
request 
datapackid 
source. fields 
EXPORTING 
result 
monitor 
RAISING 
cx rsrout abort 
cx, rsrout, skip. record 
cx rsrout, skip, val. 
METHODS 
invert, eOwlz 
IMPORTING 
i th, fields outbound 
i г selset, outbound 
i is main, selection 


i r selset. outbound, complete 


i г universe, inbound 
CHANGING 
c th. fields inbound 


c. r selset. inbound 


TYPE rsrequest 
TYPE rsdatapid 
TYPE ty ssc 1 


TYPE іу s tg 1 —/bic/gOwlz 
TYPE rstr ty t monitor 


TYPE rstran, t. field, inv 

TYPE REF TO cl, rsmds set 
TYPE rs. bool 

TYPE REF TO cl, rsmds set 
TYPE REF TO cl, rsmds universe 


TYPE rstran, t. field, inv 
TYPE REF TO cl, rsmds set 
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с. exact ТҮРЕ rs. bool. 
ENDCLASS. " routine DEFINITION 
ж $*$ begin of 2nd part global — insert your code only below this line * 
. "insert your code here 
ж $*$ end of 2nd part global — insert your code only before this line * 
* * 
ж CLASS routine IMPLEMENTATION 
* * 
* 
* * 
CLASS lcl, transform IMPLEMENTATION. 
METHOD compute, g0wlz. 
* — IMPORTING 
* request lype rsrequest 
* datapackid type rsdatapid 
* SOURCE FIELDS - /BIC/GOWL TYPE C LENGTH 000018 
* EXPORTING 
* RESULT type | ty s TG 1 -/BIC/GOWLZ 
DATA: 
monitor rec TYPE rsmonitor. 
ж $*$ begin of routine — insert your code only below this line ж-ж 
. "insert your code here 
ж —— fill table " MONITOR" with values of structure " MONITOR, REC" 
* — — to make monitor entries 
. "to cancel the update process 
* raise exception type CX. RSROUT. ABORT. 
. "to skip a record 
* raise exception type CX. RSROUT SKIP RECORD. 
. "to clear target fields 
* raise exception type CX. RSROUT SKIP VAL. 
result = source, fields — /bic/gOwl +0(6). 
ж $*$ end of routine. — insert your code only before this line ж-ж 
ENDMETHOD. " compute GOWLZ 
* * 
* Method invert GOWLZ 
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ж ж 
ж 
ж This subroutine needs to be implemented only for direct access 
* (for better performance) and for the Report/Report Interface 
* ( drill through). 
* The inverse routine should transform a projection and 
ж a selection for the target to a projection and a selection 
* for the source , respectively. 
* If the implementation remains empty all fields are filled and 
* all values are selected. 
* 
* * 
* 
* * 
METHOD invert, gOwlz. 
ж $*$ begin of inverse routine — insert your code only below this line * – * 
" insert your code here 
ж $*$ end of inverse routine — insert your code only before this line ж-ж 
ENDMETHOD. "invert GOWLZ 
ENDCLASS. " routine IMPLEMENTATION 


需要 说 明 的 是 ， 上 面 这 段 程序 一 开始 就 定义 了 两 种 Types, ШІ ty s SC 1 fI ty s TG 1, 
两 个 类 型 的 包含 字段 都 来 自 之 前 转换 中 所 指定 的 来 源 字 段 和 目标 字段 ， 如 示例 中 的 来 源 是 物 
料 ， 目 标 是 物料 组 ， 那 么 _ty_s_SC_1 的 定义 中 就 包含 了 /ZLBICZGOWL 物料 ，_ty_s_TG_1 就 包 
& I GOWLZ 物料 组 。 

在 接 下 来 的 程序 中 ， 可 以 定义 自己 需要 使 用 的 全 局 变量 ， 如 对 TABLES 的 定义 。 

再 接 下 来 就 是 对 处 理 方法 METHOD 的 定义 ，ABAP 00 对 于 定义 和 实施 是 分 开 的 。 在 定 

义 的 输入 参数 中 ， 除 了 请 求 号 和 数据 包 号 以 外 ， 还 包含 了 来 源 结 构 的 SOURCE_FIELDS， 该 
结构 和 之 前 定义 的 _ty_s_SC_1 保持 一 致 ， 输 出 接口 只 有 RESULT 和 供 输出 消息 的 MONITOR, 
fr BW 3. X 中 的 RETURNCODE 和 ABORT 标识 ,在 BW 7.X 中 被 对 应 的 例外 所 代替 。 如 果 需 
要 跳 过 一 条 记录 ， 则 需要 使 用 语句 RAISE CX. RSROUT. SKIP. RECORD, ， 如 果 需 要 退出 整个 
数据 包 的 处 理 ， 则 需要 使 用 语句 RAISE CX_RSROUT_ABORT。 

接 下 来 的 语句 和 之 前 BW 3. X 的 语句 相同 ， 只 是 参与 计算 的 各 个 变量 发 生 了 重大 的 变 
化 ，SOURCE_FIELDS 替代 了 COMM_STUCTURE 和 TRAN_STRUCUTRE。 

最 后 的 INVERT 方法 在 一 般 情况 下 不 予 使 用 ， 只 有 在 虚拟 信息 块 调用 数据 或 需要 进行 报 
表 跳 转 时 ,将 目标 选择 条 件 (虚拟 信息 块 和 跳 转 报表 的 选择 条 件 ) 转移 到 数据 来 源 ( 源 系 
统 的 数据 和 被 跳 转 报表 的 数据 ) 条 件 时 才 会 被 使 用 到 。 如 果 不 进 行 代码 编写 ， 则 所 有 的 条 
件 都 会 被 传输 到 数据 来 源 端 。 

2. 关键 指标 的 例 程 

对 于 关键 指标 的 АВАР 处 理 和 前 面谈 到 的 特性 的 处 理 几 乎 是 一 模 一 样 的 ,在 BW 系统 中 
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非常 普遍 ， 如 销售 价格 。 但 是 数据 源 上 又 没有 提供 相应 的 信息 ， 因 此 需要 通过 数据 源 上 的 销 
售 金额 和 销售 数量 进行 各 种 运算 得 到 (如 果 人 简单， 0. 但 是 这 会 影响 性 能 ， 在 
真正 的 项 目 过 程 中 不 推荐 这 一 方式 ) 。 但 是 ， 与 特性 的 例 程 处 理 的 唯一 不 同 点 是 ， 关 键 指标 
的 例 程 多 了 一 种 类 型 ， 那 就 是 “具有 单位 的 例 程 ”。 

要 创建 一 个 针对 关键 指标 的 АВАР 例 程 处 理 ， 需 要 按照 以 下 步骤 进行 。 

第 1 步 : 在 目标 规则 组 上 双击 某 个 关键 指标 ， 如 这 里 双击 KOXSJG - 销售 价格 ,系统 会 
弹出 “规则 明细 ”对 话 框 ， 如 图 5-10 所 示 。 


| um 
描述 Mo = ] 
目标 信息 对 象 Ан K0XSJG 销售 价格 
规则 类 型 х | 无 转换 a 
集合 合计 a 
AMRF: 
аа аа 
ТЕЕ | 长 文本 描述 Ган [кт [а енедт [长 文本 描述 
规 由 | 的 目标 字段 : 
KEEA 
信息 对 象 图 к 
OCURRENCY А 货币 名 称 а CUKY 5 
K0XSJG .入 销售 价格 CURR 9 
аа 传输 值 ж А Ж 


图 5-10 “规则 明细 ”对 话 框 之 关键 指标 的 例 程 

在 该 对 话 框 中 指定 来 源 字段 ， 这 里 为 了 计算 出 销售 价格 和 价格 的 单位 ,需要 根据 
KOXSJE 销售 金 о N 计算 ， 单 击 添加 源 字 段 图 标 贺 ， 增 
加 以 上 两 个 字段 ， 添 加 完毕 后 的 视图 如 图 5-11 所 示 。 


| EE 
Do rb gem] i ——— ж-т, 
目标 信息 对 象 _____ кб |на 
规则 类 型 1 | 县 有 单位 的 例 程 a 
集合 合计 a 
Ж 
目标 货币 АЁ |OCURRENCY 货币 名 称 代码 
E 从 例 程 中 a 
规则 的 源 字段 : 
а] a[=|m| JF. 
ЕЛЕНЕ | 长 文本 描述 [数据 类 | 长 度 | 转换 ， | 信息 对 象 分 配 [长 文本 描述 | 
/BIC/KOXSJE 销售 金额 CURR 17 
/BIC/KOXSSL 销售 数量 QUAN 17 
CURRENCY 货币 CUKY 5 
UNIT 计量 的 单位 UNIT 3 | CUNIT 
规 由 | 的 目标 字段 
апак) 


信息 对 象 


OCURRENCY Р) 货币 名 称 zn CUKY 5 
K0XSJG Дш 销 售 价 格 CURR 9 


ЕЛЕСІ || |a || || v 


14 
% 


5-11 添加 完 源 字段 后 的 视图 
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如 果 没 有 分 配 任何 来 源 字段 ， 则 系统 会 提示 如 图 5-12 所 示 的 信息 。 


[ES 没有 源 字 段 Е] 


Ө 没有 分 配 的 源 字段 


图 5-12 系统 提示 信息 


第 2 步 : 指定 “规则 类 型 ”为 “具有 单位 的 例 程 ”， 此 时 系统 将 自动 进入 例 程 的 编辑 界 
面 ， 例 程 的 接口 和 特性 例 程 的 接口 相同 。 

第 3 步 : 进入 例 程 的 编写 界面 后 ， 即 可 在 例 程 编辑 界面 进行 АВАР 例 程 的 编写 ， 关键 指 
标 增强 的 АВАР 例 程 代码 段 如 下 。 


PROGRAM trans, routine. 


* * 
* CLASS routine DEFINITION 

* * 
* 

* * 


CLASS 1с] transform DEFINITION. 
PUBLIC SECTION. 


* — Attributs 
DATA: 
p. check master, data, exist 


TYPE rsodsocheckonly READ — ONLY , 


ж- Instance for getting request runtime attributs; 
* Available information; Refer to methods of 
* interface if rsbk request, admintab. view 


p. r request 


TYPE REF TO if rsbk request admintab view READ – ONLY. 


PRIVATE SECTION. 
TYPE - POOLS : rsd , rstr. 
* Rule specific types 


TYPES: 
BEGIN OF ty s sc 1, 
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* Field ./BIC/KOXSSL 销售 数量 . 


/ bic/kOxssl TYPE p LENGTH 9 DECIMALS 3, 
* Field: UNIT 计量 的 单位 . 
unit TYPE c LENGTH 3, 
* Field;/BIC/KOXSJE 销售 金额 . 
/ bic/ kOxsje TYPE p LENGTH 9 DECIMALS 2, 
ж Field; CURRENCY 1 
currency TYPE c LENGTH 5, 
* Field: RECORD. 
record ТҮРЕ rsarecord , 
END ОҒ ty s sc I. 
TYPES: 
BEGIN OF ty s tg 1, 
ж InfoObject:0CURRENCY 货币 名 称 代码 . 
сштепсу TYPE/ biO/oicurrency , 
ж InfoObject; KOXSJG 销售 价格 . 
/bic/kOxsjg TYPE/bic/oikOxsjg, 


END ОҒ ty s tg 1. 


ж $*$ begin of global — insert your declaration only below this line ж-ж 


. "insert your code here 


ж $*$ end of global — insert your declaration only before this line * * 
METHODS 
compute, kOxsjg 

IMPORTING 
request TYPE rsrequest 
datapackid TYPE rsdatapid 
source fields TYPE ty sscl 

EXPORTING 
result TYPE ty s tg 1 —/bic/kOxsjg 
currency TYPE ty s tg 1 — currency 
monitor ТҮРЕ rstr ty 1 monitor 

RAISING 


cx rsrout. abort 
cx, rsrout, skip, record 
cx, rsrout, skip. val. 
METHODS 
invert, kOxsjg 
IMPORTING 
i th, fields outbound ТҮРЕ rstran, t. field, inv 
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i r selset, outbound TYPE REF TO cl, rsmds set 


і is main, selection TYPE rs, bool 

i т. selset. outbound. complete ТҮРЕ REF TO cl, rsmds set 

i г universe inbound TYPE REF TO cl, rsmds universe 

CHANGING 

c. th. fields inbound TYPE rstran, t. field, inv 

c.r selset. inbound TYPE REF TO cl rsmds. set 

с. exact TYPE rs. bool. 
ENDCLASS. " routine DEFINITION 
ж $*$ begin of 2nd part global — insert your code only below this line * 

. "insert your code here 
ж $*$ end of 2nd part global — insert your code only before this line * 
* * 
* CLASS routine IMPLEMENTATION 
* * 
* 
* * 
CLASS lcl, transform IMPLEMENTATION. 
METHOD compute, kOxsjg. 
* ІМРОВТІКС 
* request lype rsrequest 
* datapackid type rsdatapid 
* SOURCE FIELDS ~ /BIC/KOXSSL TYPE P LENGTH 000009 DECIMALS 000003 
* SOURCE FIELDS - UNIT TYPE C LENGTH 000003 
* SOURCE FIELDS - /BIC/KOXSJE TYPE P LENGTH 000009 DECIMALS 000002 
* SOURCE FIELDS - CURRENCY TYPE C LENGTH 000005 
* EXPORTING 
* RESULT type | ty s TG 1 -/BIC/KOXSJG 
* CURRENCY type | ty s TG 1 - CURRENCY 
DATA: 
monitor rec TYPE rsmonitor. 

ж $*$ begin of routine — insert your code only below this line ж-ж 


. "insert your code here 
ж —— fill table " MONITOR" with values of structure " MONITOR. REC" 


ж 一 to make monitor entries 
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. "to cancel the update process 

* raise exception type CX. RSROUT. ABORT. 
. "to skip a record 

ж raise exception type CX. RSROUT SKIP RECORD. 
. "to clear target fields 


* raise exception type CX. RSROUT SKIP VAL. 


IF source, fields - /bic/kOxssl < > 0. 
result = source, fields — /bic/kO0xsje/source. fields — /bic/ kOxssl. 
ELSE. 


result - 0. 


ENDIF. 


IF source. fields — currency IS NOT INITIAL. 


currency - source fields — currency. 


ELSE. 
currency = CNY . 
ENDIF. 

ж $*$ end of routine. — insert your code only before this line ж-ж 

ENDMETHOD. " compute. KOXSJG 
* * 
* Method invert. KOXSJG 
* * 
* 
* This subroutine needs to be implemented only for direct access 
* (for better performance) and for the Report/Report Interface 
* ( drill through). 
ж The inverse routine should transform a projection and 
* a selection for the target to a projection and a selection 
ж for the source , respectively. 
ж If the implementation remains empty all fields are filled and 
* all values are selected. 
* 
* * 
* 
* * 

METHOD invert, kOxsjg. 
ж $*$ begin of inverse routine — insert your code only below this line ж-ж 


. "insert your code here 
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ж $*$ end of inverse routine — insert your code only before this line ж-ж 


ENDMETHOD. "invert. KOXSJG 
ENDCLASS. " routine IMPLEMENTATION 


在 上 述 示例 代码 中 ， 直 接 使 用 的 是 来 源 字段 的 单位 货币 ， 但 是 很 多 时 候 ， 我 们 可 能 需要 
对 货币 进行 转换 ， 即 将 各 种 不 同 的 货币 转换 为 本 地 货币 ， 此 时 需要 加 入 如 下 代码 段 。 


IF source, fields — /bic/kOxssl < > 0. 


IF source fields - currency IS INITIAL. 
result = 0. 
currency = CNY . 
ELSE. 
result = source, fields — /bic/kOxsje/source, fields — /bic/ kOxssl. 
CALL FUNCTION CONVERT TO LOCAL CURRENCY 


EXPORTING 
date = sy — datum 
foreign amount - result 
foreign currency = source, fields — currency 
local, currency = CNY 
type. of. rate 2M 
IMPORTING 
local. amount = result 
EXCEPTIONS 
OTHERS =1 


* 无 论 结果 如 何 , 货 币 都 是 本 位 币 ,只 是 根据 汇率 计算 了 result 的 值 
IF sy - subre = 0. 
currency = CNY . 
ELSE. 
currency = CNY . 
ENDIF. 


ENDIF. "IF source fields — currency IS INITIAL. 


ENDIF. " IF source, fields ~ /bic/kOxssl < > 0. 


3. 开始 例 程 

特性 和 关键 指标 的 例 程 都 是 对 单个 字段 进行 逐条 的 数据 处 理 ， 实 际 上 ， 在 项 目 实施 过 程 
中 ， 很 多 时 候 存在 需要 一 次 性 对 所 有 的 数据 包 内 容 进行 处 理 的 可 能 性 ， 如 为 了 最 大 限度 地 节 
约 系统 的 处 理 时 间 ， 提 高 系统 的 处 理 能 力 ， 我 们 可 能 希望 在 转换 开始 之 前 ， 将 不 符合 条 件 的 
记录 一 次 性 删除 ， 这 时 就 需要 开始 例 程 的 帮助 。 
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要 在 转换 中 创建 开始 例 程 ， 最 直接 的 办 法 就 是 在 转换 的 工具 栏 上 单 击 “ 开 始 例 程 ” 按 
如 图 5-13 所 示 。 


钮 


` 


Fa 


Hae Е: D 结束 程序 || 
图 5-13 工具 栏 上 的 “开始 例 程 ”按钮 


此 时 ， 系 统 将 自动 进入 开始 例 程 的 编辑 界面 。 开 始 例 程 的 接口 如 下 : 
CD 输入 参数 


REQUEST 请 求 号 

DATAPAKID 数据 包 号 
@ 输出 参数 

MONITOR 消息 监控 器 
@ 运算 表 

SOURCE PACKAGE 数据 包 内 表 
(4) 例外 

CX_RSROUT_ABORT 取消 处 理 


示例 : 将 所 有 2010 年 以 前 的 数据 予以 删除 ， 只 保留 2010 年 及 其 以 后 年 份 的 数据 ， 代 码 
段 如 下 。 


PROGRAM trans, routine. 


* * 
* CLASS routine DEFINITION 

* * 
* 

* * 


CLASS lcl, transform DEFINITION. 
PUBLIC SECTION. 


* Attributs 
DATA: 
p. check master data, exist 


TYPE RSODSOCHECKONLY READ - ONLY, 
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ж- Instance for getting request runtime attributs; 
* Available information; Refer to methods of 


* interface" if rsbk request. admintab. view 


p. r request 


TYPE REF TO if rsbk request admintab view READ - ONLY. 


PRIVATE SECTION. 


TYPE - POOLS :rsd ,rstr. 


ж 


Rule specific types 


TYPES: 
BEGIN ОЕ ty s SC 1, 
* Field /BIC/GOGSDM 公司 代码 . 
/BIC/GOGSDM TYPE C LENGTH 8, 
* Field; CALYEAR 日 历年 . 
CALYEAR ТҮРЕ М LENGTH 4, 
* Field ;/BIC/KOXSSL 销售 数量 . 
/ BIC/KOXSSL TYPE P LENGTH 9 DECIMALS 3, 
* Field; UNIT 计量 的 单位 . 
UNIT ТҮРЕ C LENGTH 3, 
ж Field ./BIC/KOXSJE 销售 金额 . 
/ BIC/KOXSJE TYPE P LENGTH 9 DECIMALS 2, 
* Field; CURRENCY 货 
CURRENCY TYPE C LENGTH 5, 
* Field;/BIC/GOWL 物料 . 
/BIC/GOWL TYPE C LENGTH 18, 
ж Field. RECORD 记录 号 . 
RECORD TYPE RSARECORD, 
END ОЕ ty s SC I 
TYPES; 
Ay. LSC 1 TYPE STANDARD TABLE OF ty s SC. 1 


WITH NON - UNIQUE DEFAULT KEY. 


ж $*$ begin of global — insert your declaration only below this line ж-ж 
. "insert your code here 
ж $*$ end of global — insert your declaration only before this line ж-ж 
METHODS 
start. routine 
IMPORTING 


request type rsrequest 
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datapackid 
EXPORTING 

monitor 
CHANGING 

SOURCE PACKAGE 
RAISING 

cx rsrout. abort. 

METHODS 
inverse start routine 

IMPORTING 

i th, fields outbound 

i г selset, outbound 


1 is main, selection 


i r selset. outbound, complete 


i г universe, inbound 
CHANGING 

c. th. fields inbound 

c. r selset. inbound 


c, exact 


type rsdatapid 


lype rstr ty t monitors 


type ty t SC 1 


TYPE rstran, 1 field. inv 
TYPE REF TO cl rsmds. set 
ТҮРЕ rs, bool 

TYPE REF TO сі rsmds, set 


TYPE REF TO cl, rsmds universe 


TYPE rstran, 1 field. inv 
TYPE REF TO cl rsmds. set 
TYPE rs, bool. 


ENDCLASS. " routine DEFINITION 


ж $*$ begin of 2nd part global — insert your code only below this line ж 
. "insert your code here 


ж $*$ end of 2nd part global — insert your code only before this line ж 


* * 
* CLASS routine IMPLEMENTATION 

* * 
* 

* * 
CLASS lcl, transform IMPLEMENTATION. 

* * 
* Method start, routine 

* * 
ж Calculation of source package via start routine 

* * 
* <-> source package 

* * 


METHOD start, routine. 


* === Segments === 
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FIELD -SYMBOLS : 


«SOURCE FIELDS > TYPE ty s SC I. 
DATA: 
MONITOR, REC TYPE rstmonitor. 
ж $*$ begin of routine — insert your code only below this line ж-ж 


. "insert your code here 
* —— fill table " MONITOR" with values of structure " MONITOR, REC" 
* — — to make monitor entries 

. "to cancel the update process 
* raise exception type CX. RSROUT. ABORT. 


DELETE source package WHERE calyear < -2010. 


ж $*$ end of routine. — insert your code only before this line ж-ж 
ENDMETHOD. "start, routine 

ж ж 

* Method inverse. start, routine 

* * 

ж 

ж This subroutine needs to be implemented only for direct access 

* (for better performance) and for the Report/Report Interface 

* ( drill through). 

ж Тһе inverse routine should transform a projection and 

* a selection for the target to a projection and a selection 

* for the source , respectively. 

ж If the implementation remains empty all fields are filled and 

ж all values are selected. 

* 

ж ж 

ж 

ж ж 


METHOD inverse, start, routine. 


ж $*$ begin of inverse routine — insert your code only below this line * — * 


. "insert your code here 


ж $*$ end of inverse routine — insert your code only before this line ж-ж 
ENDMETHOD. "inverse, start, routine 
ENDCLASS. " routine IMPLEMENTATION 
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4. 结束 例 程 

开始 例 程 是 在 逐条 进行 转换 开始 之 前 对 整 包 数 据 进 行 处 理 ， 在 BW 7.0 之 后 ， 也 能 在 逐 
条 转换 执行 之 后 ， 对 整 包 数据 进行 一 次 性 的 处 理 ， 这 样 的 处 理 称 为 结束 例 程 。 

要 在 转换 中 创建 结束 例 程 ， 最 直接 的 办 法 就 是 在 转换 的 工具 栏 上 单 击 “ 结 束 例 程 ” 按 
钮 ， 如 图 5-14 所 示 。 


"ІЛЕ fes] eO eee [| Г 结束 程序 E] 


图 5-14 工具 栏 上 的 “结束 例 程 ” 按 钮 


此 时 ， 系 统 将 自动 进入 结束 例 程 的 编辑 界面 。 结 束 例 程 的 接口 如 下 : 
CD 输入 参数 


REQUEST 请 求 号 
DATAPAKID 数据 包 号 
输出 参数 
MONITOR ЇН E dn 
@ 运算 表 
RESULT PACKAGE 数据 包 内 表 
(4) 例外 
CX_RSROUT_ABORT 取消 处 理 


我 们 可 以 看 到 ， 由 于 处 理 的 方式 和 开始 例 程 一 样 ， 因 此 接口 的 参数 也 几乎 一 样 ， 唯 一 的 
变化 在 于 开始 例 程 需要 处 理 的 数据 存在 于 SOURCE. PACKAGE 中 ， 而 结束 例 程 需要 处 理 的 数 
据 存在 于 RESULT. PACKAGE 中 。 

示例 : 将 所 有 物料 计算 得 到 的 物料 组 ， 前 面 均 加 上 字符 “MG_”， 有 具体 代码 如 下 。 


PROGRAM trans, routine. 


* * 
* CLASS routine DEFINITION 

* * 
* 

* * 


CLASS lcl, transform DEFINITION. 
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PUBLIC SECTION. 


* — Attributs 
DATA: 
p. check master, data, exist 


TYPE RSODSOCHECKONLY READ - ONLY, 


ж- Instance for getting request runtime attributs; 
* Available information; Refer to methods of 
* interface! if rsbk request, admintab. view 


pr. request 


TYPE REF TO if rsbk request admintab view READ - ONLY. 


PRIVATE SECTION. 


TYPE - POOLS :rsd ,rstr. 


* Rule specific types 


TYPES; 
BEGIN OF ty s TG 1, 

* InfoObject : GOGSDM 公司 代码 . 

/ BIC/GOGSDM TYPE/BIC/OIGOGSDM , 
* InfoObject: OCALYEAR H 历年 . 

CALYEAR TYPE/BIO/OICALYEAR , 
* InfoObject; KOXSSL 销售 数量 . 

/ BIC/KOXSSL TYPE/BIC/OIKOXSSL, 
* InfoObject; KOXSJE 销售 金额 . 

/ BIC/KOXSJE TYPE/BIC/OIKOXSJE , 
* InfoObject : OUNIT 计量 的 单位 . 

UNIT TYPE/BIO/OIUNIT, 
ж InfoObjeet:OCURRENCY 货币 名 称 代码 . 

CURRENCY TYPE/BIO/OICURRENCY , 
* InfoObject; KOXSJG 销售 价格 . 

/BIC/ KOXSJG TYPE/BIC/OIKOXSJG, 
ж InfoObject :OLOGSYS 源 系统 . 

LOGSYS ТҮРЕ RSDLOGSYS, 
ж InfoObject: GOWL 物料 . 

/BIC/GOWL TYPE/BIC/OICOWL, 
* InfoObject : GOWLZ 物料 组 . 

/ BIC/GOWLZ TYPE/BIC/OIGO WLZ, 
* Field; RECORD. 

RECORD TYPE RSARECORD, 
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END ОҒ ty s TG 1. 
TYPES: 


ty t TG 1 TYPE STANDARD TABLE OF ty s TG 1 


WITH NON - UNIQUE DEFAULT KEY. 


ж $*$ begin of global — insert your declaration only below this line ж-ж 
. "insert your code here 
ж $*$ end of global — insert your declaration only before this line * — * 
METHODS 
end_routine 
IMPORTING 
request type rsrequest 
datapackid type rsdatapid 
EXPORTING 
monitor Lype rstr_ty_t_monitors 
CHANGING 
RESULT_PACKAGE type ty t TG 1 
RAISING 
cx rsrout. abort. 
METHODS 
inverse end routine 
IMPORTING 
i th, fields outbound TYPE rstran, t. field, inv 
i r selset, outbound TYPE REF TO cl, rsmds set 
i is main, selection ТҮРЕ rs, bool 
i r selset outbound. complete TYPE REF TO cl, rsmds set 
i г universe. inbound TYPE REF TO cl, rsmds universe 
CHANGING 
c th. fields inbound ТҮРЕ rstran. t field. inv 
c. r selset. inbound ТҮРЕ REF TO cl rsmds. set 
с. exact TYPE rs. bool. 
ENDCLASS. "routine DEFINITION 
ж $*$ begin of 2nd part global — insert your code only below this line 
. "insert your code here 
ж $*$ end of 2nd part global — insert your code only before this line 
* * 
* CLASS routine IMPLEMENTATION 
* * 
* 
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ж 


CLASS Ісі transform IMPLEMENTATION. 


ж ж 
* Method end, routine 
* * 
ж Calculation of result package via end routine 
* Note: АП not overwritten field values within the routine 
* are transferred from the corresponding source fields. This 
ж means , all fields not supplied by the transformation source 
* are send with initial values to the transformation target. 
* * 
* <-> result package 
ж ж 
METHOD end, routine. 
* === Segments === 
FIELD -SYMBOLS : 
< RESULT_FIELDS > TYPE ty s TG I. 
DATA: 
MONITOR. REC TYPE rstmonitor. 
ж $*$ begin of routine — insert your code only below this line ж-ж 
. "insert your code here 
* —— fill table " MONITOR" with values of structure " MONITOR, REC" 
类 -二 to make monitor entries 
. "to cancel the update process 
ж raise exception type CX. RSROUT АВОВТ. 
LOOP AT RESULT PACKAGE ASSIGNING < result, fields >. 
CONCATENATE MG' «result. fields > —/bic/gOwlz INTO 
< result, fields > — /bic/g0wlz. 
ENDLOOP. 
ж $*$ end of routine — insert your code only before this line ж-ж 
ENDMETHOD. "end routine 
* * 
* Method inverse end routine 
ж ж 
ж 
ж This subroutine needs to be implemented only for direct access 
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(for better performance) and for the Report/Report Interface 
( drill through). 

Тһе inverse routine should transform a projection and 

a selection for the target to a projection and a selection 

for the source , respectively. 

If the implementation remains empty all fields are filled and 


all values are selected. 


* * * * * * * * * * * 


METHOD inverse, end, routine. 


ж $*$ begin of inverse routine — insert your code only below this line * —* 


. "insert your code here 


ж $*$ end of inverse routine — insert your code only before this line ** —* 
ENDMETHOD. "inverse end routine 
ENDCLASS. " routine IMPLEMENTATION 


5. 专家 例 程 

上 述 介 绍 的 各 种 例 程 都 是 源 结构 和 目标 结构 已 经 分 别 存在 于 数据 目标 和 数据 来 源 中 
了 ， 此 时 例 程 能 够 很 好 地 满足 需要 ， 但 是 现实 中 有 时 情况 并 不 是 这 样 。 从 BW 7. 0 开 
始 ， 系 统 提供 了 一 个 完全 由 开发 人 员 自 己 编写 代码 来 进行 逻辑 处 理 的 全 新 方式 一 一 
“专家 例 程 ”。 

专家 例 程 的 好 处 是 自由 度 高 ， 所 有 的 代码 都 由 开发 人 员 自 己 编写 , 但 是 同时 所 有 的 目标 
字段 和 结构 ， 包 括 单 位 和 货币 的 转换 等 都 需要 在 程序 中 通过 编写 代码 得 以 实现 。 最 为 艰难 的 
E, BW 并 没有 提供 一 个 类 似 MONITOR 的 内 表 来 进行 错误 的 处 理 和 消息 的 存储 ， 而 是 使 用 
一 个 日 志 对 象 类 ， 该 类 不 仅 接受 消息 ， 而 且 提供 了 一 个 完整 的 消息 树 ， 这 个 类 的 技术 名 称 是 
CL_RSBM_LOG_CURSOR_STFEP。 这 对 于 很 多 开发 人 员 来 说 也 是 最 为 痛 否 的， 因为 这 需要 掌 
握 极 其 复杂 的 ABAP 00 程序 知识 。 

相对 于 传统 的 转换 和 例 程 而 言 ， 专 家 例 程 无 疑 在 性 能 上 更 胜 一 筹 ， 因 为 传统 的 转换 是 单 
个 字段 进行 处 理 的 ， 而 在 专家 例 程 中 ， 可 以 使 用 类 似 MOVE -CORRESPONDING 的 语言 对 所 
有 字段 进行 一 次 性 的 处 理 。 

使 用 专家 例 程 的 另 一 个 好 处 就 是 ， 我 们 可 以 根据 程序 的 版 本 变化 和 请 求 传输 的 日 期 等 信 
息 ， 了 解 当 前 数据 目标 中 的 数据 哪些 请 求 是 哪个 版 本 的 逻辑 ， 而 这 样 的 版 本 追踪 信息 在 标准 
的 转换 中 难以 得 到 。 

创建 专家 例 程 的 唯一 方式 就 是 单 击 “编辑 ”一 “专家 例 程 ”菜单 ， 当 选择 专家 例 程 时 ， 
会 出 现 如 图 5-15 所 示 的 提示 信息 。 
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[e ipie dà Á 


[2] 是 否 要 删除 转换 RSDS SINODSO1 PC FILE -> CUBE SIN 
OCO2 (OTSDSDSSLXGRSWBZD5T 
BBSVAIFSESCEKG)? 并 使 用 专家 程序 将 其 蔡 换 ? 


取消 


[5-15 SAP 系统 提示 信息 


单 击 “ 是 ”按钮 就 创建 了 专家 例 程 ， 此 时 可 以 看 到 ， 专 家 例 程 和 标准 的 例 程 差别 很 大 ， 
条 大 的 箭头 线 取代 了 之 前 各 个 字段 之 间 用 于 连接 的 箭头 线 ， 如 图 5-16 所 示 。 


转换 (T) 编辑 (E) 转 到 (6) 附加 (X) 系统 (Y) 帮助 (H) 


[v] а зв еае Б Ф| апаа == om 
转换 更 改 
КЕЕ eE жерн |ПС өзне E 专家 程序 
=] 转换 RSDS 51400501 PC FILE -> CUBE SINOCO2 
ES RP SINO 数 据 头 01 (SINODSO1) 
目标 @ SINO 信息 块 02 (SINOCO2) 
版 本 © | 在 处 理 中 1 © 已 保存 
活动 版 本 [网 不 存在 二 | 编辑 的 版 本 


z[&[&[ 10% »[m] | B [t3] Әлия [зла | Еялі [Bau | [EZ [ie] | |) (I | 


Expertenroutine 


(85-16 添加 了 专家 例 程 的 转换 显示 
系统 自动 产生 的 专家 例 程 的 代码 如 下 : 


PROGRAM trans, routine. 


* CLASS routine DEFINITION 
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CLASS Ісі transform DEFINITION. 
PUBLIC SECTION. 


* — Attributs 
DATA: 


p. check. master, data, exist 


TYPE RSODSOCHECKONLY READ - ONLY, 


ж- Instance for getting request runtime attributs; 
* Available information; Refer to methods of 
* interface" if rsbk request, admintab. view 


p. r request 


ТҮРЕ REF TO if rsbk request admintab view READ - ONLY. 


PRIVATE SECTION. 


TYPE - POOLS :rsd ,rstr. 


* 


Rule specific types 


TYPES: 
BEGIN OF ty s SC 1, 
* Field /BIC/GOGSDM 公司 代码 . 
/ BIC/GOGSDM TYPE C LENGTH 8, 
ж Field; CALYEAR 日 历年 . 
CALYEAR ТҮРЕ N LENGTH 4, 
ж Field ;/BIC/GOWL 物料 . 
/BIC/GOWL TYPE C LENGTH 18, 
* Field ;/BIC/KOXSSL 销售 数量 . 
/BIC/ KOXSSL ТҮРЕ P LENGTH 9 DECIMALS 3, 
ж Field: UNIT 计量 的 单位 . 
UNIT TYPE C LENGTH 3, 
ж Field ;/BIC/KOXSJE 销售 金额 . 
/ BIC/KOXSJE TYPE P LENGTH 9 DECIMALS 2, 
* Field; CURRENCY 货 
CURRENCY TYPE C LENGTH 5, 
ж Field. RECORD 记录 号 . 
RECORD TYPE RSARECORD, 
END OF ty s SC I 
TYPES; 
Ay. LSC 1 TYPE STANDARD TABLE OF | ty s SC. 1 
WITH NON - UNIQUE DEFAULT KEY. 
TYPES; 
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BEGIN OF | ty s TG 1, 


* InfoObject : GOGSDM 公司 代码 . 

/ BIC/GOGSDM TYPE/BIC/OIGOGSDM , 
* InfoObject: OCALYEAR Н 历年 . 

CALYEAR TYPE/BIO/OICALYEAR , 
ж InfoObject: KOXSSL 销售 数量 . 

/ BIC/KOXSSL TYPE/BIC/OIKOXSSL, 
* InfoObject ; KOXSJE 销售 金额 . 

/ BIC/KOXSJE TYPE/BIC/OIKOXSJE , 
* InfoObject :OUNIT 计量 的 单位 . 

UNIT ТҮРЕ/ВІ0/ ОШМІТ, 
ж InfoObject:0CURRENCY 货币 名 称 代码 . 

CURRENCY TYPE/BIO/OICURRENCY , 
* InfoObject; KOXSJG 销售 价格 . 

/BIC/ KOXSJG TYPE/BIC/OIKOXSJG, 
ж InfoObject :OLOGSYS 源 系统 

LOGSYS ТҮРЕ RSDLOGSYS, 
ж InfoObject: GOWL 物料 . 

/BIC/GOWL TYPE/BIC/OIGOWL, 
* InfoObject : GOWLZ 物料 组 . 

/ BIC/GOWLZ TYPE/BIC/OIGOWIZ , 
* Field; RECORD. 

RECORD TYPE RSARECORD, 

END ОЕ ty. s TG 1. 
TYPES; 
ay ТС 1 TYPE STANDARD TABLE OF у s TG 1 


WITH NON - UNIQUE DEFAULT KEY. 


ж $*$ begin of global — insert your declaration only below this line 


. "insert your code here 


ж $*$ end of global — insert your declaration only before this line 


METHODS 
expert routine 
IMPORTING 
request 
datapackid 
SOURCE PACKAGE 
log 
EXPORTING 
RESULT PACKAGE 
METHODS 


type rsrequest 
type rsdatapid 
type ty t SC 1 


type ref to cl. rsbm log cursor. step 


type ty t TG I. 
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inverse expert routine 
IMPORTING 
i th, fields outbound 
i r selset, outbound 
i г universe inbound 
CHANGING 
c th. fields inbound 


c. r selset, inbound 


TYPE rstran, 1 field. inv 
TYPE REF TO сі rsmds, set 
TYPE REF TO cl, rsmds universe 


TYPE rstran, 1 field. inv 
TYPE REF TO cl rsmds. set 


c. exact TYPE rs. bool. 
ENDCLASS. " routine DEFINITION 
ж $*$ begin of 2nd part global — insert your code only below this line * 
. "insert your code here 
ж $*$ end of 2nd part global — insert your code only before this line * 
* * 
* CLASS routine IMPLEMENTATION 
* * 
* 
* * 
CLASS lcl, transform IMPLEMENTATION. 
* * 
ж Method expert. routine 
* * 
* Calculation of result package via expert routine 
* * 
* -> package of source segments 
ж <- result package 
* * 
METHOD expert. routine. 
Ж === Segments === 
FIELD -SYMBOLS : 
«SOURCE FIELDS > TYPE ty s SC I. 
DATA: 
RESULT FIELDS TYPE ty s TG I. 
ж $*$ begin of routine — insert your code only below this line ж-ж 


. "insert your code here 
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ж $*$ end of routine. - insert your code only before this line ж-ж 
ENDMETHOD. " expert. routine 
* * 
* Method inverse, expert, routine 
* * 
* 
* This subroutine needs to be implemented only for direct access 
* (for better performance) and for the Report/Report Interface 
* ( drill through). 
ж The inverse routine should transform a projection and 
ж a selection for the target to a projection and a selection 
ж for the source , respectively. 
ж If the implementation remains empty all fields are filled and 
* all values are selected. 
* 
* * 
* 
* * 
METHOD inverse, expert, routine. 
ж $*$ begin of inverse routine — insert your code only below this line * —* 
" insert your code here 
ж $*$ end of inverse routine — insert your code only before this line ж-ж 
ENDMETHOD. "inverse expert routine 
ENDCLASS. " routine IMPLEMENTATION 


从 上 面 的 代码 中 可 以 看 到 ， 专 家 例 程 的 接口 综合 了 开始 例 程 和 结束 例 程 的 内 容 。 其 中 ， 
REQUEST 和 DATAPACKID 作为 输入 参数 ; 运算 表 则 包括 SOURCE_PACKAGE 和 RESULT_ 
PACKAGE, LOG 对 象 用 来 返回 消息 日 志 。 需 要 特殊 说 明 的 是 ，LOG 数据 对 象 不 是 一 个 简单 
的 表 ， 因 此 需要 自己 构建 整个 消息 树 。 

剩 下 的 事情 直接 进行 赋值 的 专家 例 程 的 代码 如 下 。 全 都 在 专家 例 程 中 ， 我 们 需要 对 每 一 
个 待 处 理 的 目标 字段 进行 处 理 ， 并 将 相关 的 信息 传 给 LOG 记录 对 象 。 


PROGRAM trans, routine. 


* * 
* CLASS routine DEFINITION 

* * 
* 
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ж 


CLASS 1с] transform DEFINITION. 
PUBLIC SECTION. 


ж — Attributs 
DATA: 


p. check, master. data exist 


TYPE RSODSOCHECKONLY READ - ONLY, 


ж- Instance for getting request runtime attributs; 
* Available information; Refer to methods of 
* interface" if rsbk request, admintab, view 


p. r request 


TYPE REF TO if rsbk request admintab view READ - ONLY. 


PRIVATE SECTION. 
TYPE – POOLS : rsd , rstr. 
* — Rule specific types 


TYPES: 
BEGIN OF ty s SC 1, 


* Field ;/BIC/GOGSDM 公司 代码 . 
/ BIC/GOGSDM TYPE C LENGTH 8, 
* Field; CALYEAR 日 历年 . 
CALYEAR ТҮРЕ N LENGTH 4, 
ж Field ;/BIC/GOWL 物料 . 
/BIC/GOWL TYPE C LENGTH 18, 
* Field ;/BIC/KOXSSL 销售 数量 . 
/ BIC/KOXSSL TYPE P LENGTH 9 DECIMALS 3, 
* Field: UNIT 计量 的 单位 . 
UNIT TYPE C LENGTH 3, 
ж Field ;/BIC/KOXSJE 销售 金额 . 
/ BIC/KOXSJE TYPE P LENGTH 9 DECIMALS 2, 
* Field; CURRENCY 货 
CURRENCY TYPE C LENGTH 5, 
ж Field. RECORD 记录 号 . 
RECORD TYPE RSARECORD, 


END ОЕ ty s SC I. 
TYPES: 
_ty_t SC_1 


TYPE STANDARD TABLE OF ty s SC 1 
WITH NON - UNIQUE DEFAULT KEY. 
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ТҮРЕ5; 
BEGIN OF | ty s TG 1, 


* InfoObject: GOGSDM 公司 代码 . 
/ BIC/GOGSDM TYPE/BIC/OIGOGSDM ， 
* InfoObject; OCALYEAR 日 历年 . 
CALYEAR TYPE/BIO/OICALYEAR, 
ж InfoObject; KOXSSL 销售 数量 . 
/ BIC/KOXSSL TYPE/BIC/OIKOXSSL, 
* InfoObject ; KOXSJE 销售 金额 . 
/ BIC/KOXSJE TYPE/BIC/OIKOXSJE , 
* InfoObject :OUNIT 计量 的 单位 . 
UNIT TYPE/BIO/OIUNIT, 
* InfoObject :OCURRENCY 货币 名 称 代码 . 
CURRENCY TYPE/BIO/OICURRENCY , 
ж InfoObject; KOXSJG 销售 价格 . 
/BIC/ KOXSJG TYPE/BIC/OIKOXSJG, 
ж InfoObject: GOWL 物料 . 
/BIC/GOWL TYPE/BIC/OIGOWL, 
* Field ; RECORD. 
RECORD TYPE RSARECORD, 
END ОЕ у в TG I. 
TYPES; 
ay ТС 1 TYPE STANDARD TABLE OF ty s TG 1 
WITH NON - UNIQUE DEFAULT KEY. 
ж $*$ begin of global — insert your declaration only below this line * — % 


. "insert your code here 


DATA :gw. source package TYPE ty s sc 1, 


gw result package TYPE ty s tg 1l. 


DATA :zvarl TYPE/bic/oig0gsdm, 
zvar2 TYPE/biO/oicalyear, 
zvar3 TYPE/bic/oigOwl , 
zvar4 TYPE/ bic/oikOxssl , 
zvar5 TYPE/bi0/oiunit , 
zvar6 TYPE/ bic/oikOxsje , 
zvar7 TYPE/ biO/oicurrency. 


ж $*$ end of global — insert your declaration only before this line жж 
METHODS 
expert routine 
IMPORTING 
request type rsrequest 
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datapackid 
SOURCE PACKAGE 
log 
EXPORTING 
RESULT PACKAGE 
METHODS 
inverse expert routine 
IMPORTING 
i th, fields outbound 
i r selset, outbound 
i г universe inbound 
CHANGING 
c. th. fields inbound 
c.r selset. inbound 


c, exact 


ENDCLASS. 


type rsdatapid 
type ty t SC 1 


type ref to cl. rsbm, log cursor step 


type ty t TG I. 


TYPE rstran, 1 field. inv 
TYPE REF TO cl, rsmds. set 
TYPE REF TO cl, rsmds universe 


TYPE rstran, t. field. inv 
TYPE REF TO сі rsmds, set 
TYPE rs, bool. 

" routine DEFINITION 


ж $*$ begin of 2nd part global — insert your code only below this line 


. "insert your code here 


ж $*$ end of 2nd part global — insert your code only before this line 


* 


ж 


CLASS routine IMPLEMENTATION 


CLASS lcl, transform IMPLEMENTATION. 


* 


* 


Method expert. routine 


Calculation of result package via expert routine 


—» package of source segments 


«- result package 


METHOD expert. routine. 


=== Segments === 


FIELD -SYMBOLS : 
<SOURCE_FIELDS > 


TYPE ty s SC I. 
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DATA: 


RESULT FIELDS TYPE ty s TG 1. 
ж $*$ begin of routine — insert your code only below this line ж-ж 
. "insert your code here 
LOOP AT SOURCE PACKAGE INTO gw SOURCE. PACKAGE. 
* 
zvarl = gw. source, package - /bic/gOgsdm. 
zvar2 = gw. source, package - calyear. 
zvar3 = gw. source, package - /bic/gOwl. 
zvar4 = gw. source package – /bic/kOxssl. 
zvar5 = gw. source. package - unit. 
zvar6 = gw. source, package – /bic/kOxsje. 
zvar7 = gw. source package — currency. 
* 
gw result package - /bic/g0gsdm = zvarl. 
gw result package - calyear = zvar2. 
gw result package - /bic/g0wl = zvar3. 
gw result package - /bic/ kOxssl = zvar4. 
gw result package - unit = zvar5. 
gw result package - /bic/ kOxsje = zvar6. 
gw result package - currency = zvar7. 
gw result package - /bic/ kOxsjg = zvar6/zvar4. 
APPEND gw. RESULT PACKAGE TO RESULT PACKAGE. 
* 
CLEAR :zvarl , 
zvar2, 
zvar3 , 
туа, 
zvar, 
zvar6 , 
zvar7. 
ENDLOOP. 
ж $*$ end of routine. — insert your code only before this line ж-ж 
ENDMETHOD. " expert. routine 
* * 
* Method inverse, expert, routine 
* * 
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ж This subroutine needs to be implemented only for direct access 

* (for better performance) and for the Report/Report Interface 

* ( drill through). 

* The inverse routine should transform a projection and 

* a selection for the target to a projection and a selection 

ж for the source , respectively. 

* If the implementation remains empty all fields are filled and 

* all values are selected. 

* 

* * 
* 

* * 


METHOD inverse, expert, routine. 


ж $*$ begin of inverse routine — insert your code only below this line * – * 


. "insert your code here 


ж $*$ end of inverse routine — insert your code only before this line ж-ж 
ENDMETHOD. "inverse, expert, routine 
ENDCLASS. " routine IMPLEMENTATION 


5.2.3 单元 小 结 


在 BW HY ETL (ETL 是 专 有 名 词 ， 是 抽取 、 转 换 、 装 载 这 样 的 过 程 的 组 合 ) 过 程 中 ， 对 
数据 进行 清洗 和 整理 的 主要 环节 是 Transformation ， 并 且 实 际 项 目 中 大 部 分 的 时 间 和 精力 也 
都 花 在 了 如 何 正确 地 反映 清洗 逻辑 上 ， 因 此 选择 正确 的 方式 处 理 转换 至 关 重 要 。 

如 果 需 要 大 批量 、 集 中 地 处 理 数 据 ， 则 建议 在 开始 例 程 或 结束 例 程 中 处 理 ， 不 建议 直接 
在 特性 例 程 中 处 理 。 有 些 指标 可 以 在 查询 中 采用 制作 公式 或 计算 关键 指标 的 方式 得 到 ， 也 可 
以 在 例 程 中 完成 后 保存 下 来 ， 如 果 该 指标 需要 被 反复 使 用 ， 则 建议 在 例 程 中 处 理 完毕 后 保存 
到 数据 库 ， 以 最 大 限度 地 提升 报表 的 性 能 。 


5.3 数据 传输 进程 中 的 增强 实施 


5.3.1 应 用 场景 描述 


虽然 很 多 时 候 我 们 可 以 在 转换 的 开始 例 程 中 对 数据 的 选择 和 处 理 进行 代码 编写 ， 但 是 很 
多 时 候 一 旦 这 些 转 换 传输 到 生产 系统 ， 而 生产 系统 一 般 被 设置 为 不 能 修改 ， 那 么 选择 条 件 就 
被 固定 死 了 。 相 反 ， 如 果 可 以 在 DTP 中 进行 数据 的 灵活 选择 ， 则 相对 而 言 ， 在 生产 系统 中 
的 维护 工作 量 将 会 大 大 减少 。 
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假设 有 以 下 两 个 对 数据 进行 选择 的 场景 

1) 需要 在 DTP 中 对 原始 数据 的 数据 文件 名 称 进行 动态 选择 。 
2) 需要 对 读 取 文 件 的 内 容 进行 过 滤 ， 并 且 最 好 支持 动态 的 过 滤 ， 即 在 运行 该 DTP 时 ， 
系统 弹出 对 话 框 ， 可 以 让 用 户 自由 输入 选择 区 间 。 


在 数据 传输 进程 中 选择 文件 名 称 


使 用 例 程 编写 文件 名 称 的 目的 是 为 了 系统 能 够 灵活 地 选择 文件 名 称 ， 特 别 是 当 将 文件 放 
到 服务 器 的 目录 ， 并 且 每 天 都 有 新 文件 时 ， 可 能 需要 每 天 给 文件 一 个 新 的 名 字 ， 这 样 我 们 就 
需要 对 文件 的 名 称 进 行动 态 选择 。 
为 了 在 DTP 中 使 用 例 程 来 确定 文件 名 称 ， 需 要 按照 以 下 步骤 进行 创建 。 

第 1 步 : 确保 DTP 的 执行 模式 是 “完全 ”， 而 不 是 “ 增 量 ”。 

第 2 步 : ТЕ DTP 的 抽取 界面 , 勾 选 “不 从 PSA 提取 但 是 访问 数据 源 (针对 小 规模 数 
据 )” 复 选 框 ， 此 时 系统 下 方 会 出 现 文件 选择 界面 ， 如 图 5-17 所 示 。 


юш ви n6 


5.39.2 


数据 源 LEE E 
SINODSOS TPCFILE 
SINO 数 据 原 03 
提取 模式 == a|) ВЕ yh: 
4 语义 组 


包 大 小 2147483, 646 
МТА PSA 提取 但 是 访问 数据 源 (针对 数据 的 小 金额 ) 


适配器 从 本 地 工作 站 中 装载 文本 类 型 文件 

文件 名 称 C:5INODS0120120717.csv 

要 忽略 的 抬头 行 1 

字符 集 设置 ӘНЕ 

系统 代码 页 4102 UTF-16BE Unicode / ISO/IEC 10646 

数据 格式 使 用 分 隔 符 分 隔 (例如 , ЕЗІНІН) 

数据 分 隔 符 Нех 

退出 符号 Нех 


5-17 文件 选择 界面 


第 3 步 : 单 击 文件 名 称 后 面 的 创建 文件 名 称 的 例 程 图 标 图 ， 在 弹出 的 对 话 框 中 输入 描 
述 ， 如 这 里 输入 “根据 日 期 自动 确定 文件 名 ”， 如 图 5-18 所 示 。 


[cr 例 程 名 称 : ЁРЕ 
名 称 


WY 编辑 器 |X 


根据 日 期 自动 确定 文件 名 | 
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K 5-18 ” 例 程 文本 描述 输入 


第 4 步 : 在 出 现 的 例 程 编辑 界面 进行 文件 名 称 的 例 程 编辑 。DTP 中 的 文件 名 选择 例 程 的 
代码 如 下 。 


PROGRAM filename, routine. 

* Global code 

ж $*$ begin of global — insert your declaration only below this line ж-ж 
* Enter here global variables and type declarations 

* as well as additional form routines , which you may call from the 

ж main routine COMPUTE FLAT FILE FILENAME below 

* TABLES:;... 

* DATA: 


ж $*$ end of global — insert your declaration only before this line ж-ж 


* 


FORM compute, flat. file filename 


USING p. infopackage TYPE rslogdpid 
p. datasource TYPE rsoltpsourcer 
p. logsys TYPE rsslogsys 
CHANGING р filename TYPE rsfilenm 
p. вис LIKE sy — subrc. 
ж $*$ begin of routine — insert your code only below this line ж-ж 


ж This routine will be called by the adapter, 
* when the infopackage is executed. 

* 文件 名 称 是 数据 源 名 称 +“_ ”+ “日 期 ” 
CONCATENATE SINODS03 sy – datum' . CSV INTO p filename. 


p. subrc -0. 
ж $*$ end of routine. — insert your code only before this line 六 一 六 


ENDFORM. " compute. flat, file filename 
当 通 过 以 上 方式 抽取 数据 时 ， 不 需要 在 数据 源 下 新 建 信息 包 ， 而 且 由 于 数据 并 没有 上 载 


到 PSA， 而 是 直接 从 源 文件 上 载 到 数据 目标 ， 因 此 在 进行 数据 源 的 管理 时 也 无 法 看 到 对 应 的 
数据 包 。 


5.3.3 在 数据 传输 进程 中 指定 特性 的 选择 条 件 


和 信息 包 类 似 ， 在 BW 中 经 常会 通过 一 些 限制 条 件 来 对 数据 进行 获取 ， 如 有 时 数据 量 太 
大 ， 需 要 进行 数据 的 上 载 测 试 ， 那 么 此 时 我 们 有 必要 对 日 历年 进行 限制 ， 因 此 在 DTP 中 为 
特性 增加 选择 条 件 就 显得 很 有 必要 了 。 

为 了 在 DTP 中 使 用 例 程 来 确定 特性 的 选择 条 件 ， 需 要 按照 以 下 步骤 进行 例 程 的 创建 。 

第 1 步 : 在 DTP 的 “提取 ”标签 页 中 ， 选 择 过 滤器 ， 如 图 5-19 所 示 。 
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数据 传输 进程 RSNF:SINODSO3 / TPCFILE -> SINOCO3 


数据 源 Шо НЕЕ E] 
ISINODS03 TPCFILE 
SINO 数 据 源 03 
提取 模式 | 完全 g (Ж 过 滤器 


包 大 小 与 源 中 的 包 太 小 一 致 . 
在 运行 时 间 动态 确定 . 
口 不 从 PSA 提取 但 是 访问 数据 源 (针对 数据 的 小 金额 ) 


图 5-19 选择 过 滤器 


第 2 步 : 在 特性 选择 界面 ， 在 打开 的 需要 进行 限制 的 特性 选择 框 后 ， 单 击 本 行 最 后 面 的 
第 二 个 图 标 回 ， 进 行 例 程 的 创建 ， 如 图 5-20 所 示 。 


Enis 
E 更 改选 择 
公司 代码 l B 到 | | >| oS 
企业 物料 编码 | 到 | >| ol 
销售 订单 合 税 总 金额 (жш | 到 ә) [om 
销售 订单 数量 销售 单位 ) — | 到 | EZ oS 
日 历年 [ | 到 | | ИГЕ 
fürs [| | 到 | | >| =? 
销售 单位 Г] 到 | | ШЕБІ 


5-20 Æ DTP 的 筛选 器 界面 创建 例 程 


第 3 步 : 单 击 例 程 创建 图 标 后 ， 系 统 弹出 对 话 框 ， 提 示 输 入 例 程 的 中 文 描述 ， 此 时 输入 
限制 条 件 的 描述 ， 如 这 里 输入 “限制 年 度 为 2012 年 及 其 以 后 ”"， 如 图 5-21 所 示 。 


导数 据 传输 协议 选择 : 创建 例 各 
E: | 限制 年 度 为 2012 年 及 其 以 局 m | 
ЖЕЕ! 


5-21 ЖАЛЛА 
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第 4 步 : 输入 描述 后 ， 单 击 “ 编 辑 带 ”按钮 ， 系 统 将 进入 例 程 编辑 界面 ， 
生 的 代码 如 下 。 


系统 自动 产 


*& 

Soluce ж 

*& Include RSBC SEL ROUTINE TPL 
*& 
pu EE ж 


program conversion, routine. 

* Type pools used by conversion program 

type - pools : rsarc , rsarr , rssm. 

tables : rssdlrange. 

* Global code used by conversion rules 

ж $*$ begin of global — insert your declaration only below this line ж-ж 
ж TABLES;... 

* DATA: 


ж $*$ end of global — insert your declaration only before this line ж-ж 


* 

* Fieldname - 

* data type = 

ж length = 000000 
* 


form compute . 

tables 1. t. range structure rssdlrange 

using i r request type ref to IF КВК REQUEST АРМІМТАВ VIEW 

i fieldnm type RSFIELDNM 

changing p. subrc like sy — subrc. 
* Insert source code to current selection field 
ж $*$ begin of routine — insert your code only below this line 
data;l idx like sy – tabix. 

read table l t range with key 
fieldname 2' . 


1 idx = sy - tabix. 


if lidx < > 0. 

modify 1. t range index 1 іх. 
else. 

append l t range. 


endif. 
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p. subre = 0. 


ж $*$ end of routine. — insert your code only before this line 


endform. 


在 上 述 代码 段 中 可 以 看 到 该 代码 段 的 相关 接口 。 其 中 ，L_T_RANGCE 包含 了 所 有 的 选择 


条 件 ， 因 此 需要 做 出 限制 或 更 改 的 就 是 这 个 内 表 ; 参数 P_SUBRC 必须 被 赋值 为 0， 和 否则 系 
统 将 取消 该 DTP 的 运行 ， 因 为 这 被 系统 认为 是 有 参数 丢失 。 在 表 L_T_RANCGE 中 ， 必 须 给 表 
格 字 段 FIELDNAME, IOBJNM 和 相关 的 RANGES (包含 字段 SIGN, OPTION, LOW 和 
НІСН) 赋值 。 


值得 说 明 的 是 ， 对 于 BCT 业务 目录 中 包含 的 特性 ，FIELDNAME 只 需要 去 掉 前 面 的 “0” 


即 可 ， 如 果 是 用 户 自 定义 的 特性 ， 那 么 FIELDNAME 必须 在 特性 前 面 加 上 前 级 “/BIC/”， 
如 公司 代码 ， 如 果 是 业务 目录 的 特性 0COMP_CODE, 那么 FIELDNAME 应 该 赋值 为 COMP_ 


CODE; 如 果 是 自 定义 GSDM， 那 么 FIELDNAME 应 该 赋值 为 /BIC/CSDM 。 
举例 : DTP 中 的 特性 选择 ， 代 码 如 下 。 


*& 
*& Include RSBC SEL ROUTINE TPL 
*& 


program conversion, routine. 

* Type pools used by conversion program 
type — pools ; rsarc , rsarr , rssm. 
tables : rssdlrange. 


* Global code used by conversion rules 


ж $*$ begin of global — insert your declaration only below this line ж-ж 
ж TABLES:... 

DATA:l year(4) TYPE n. 

* DATA: 

ж $*$ end of global — insert your declaration only before this line ж-ж 
* 

* Fieldname - CALYEAR 

* data type = NUMC 

ж length - 000004 


* 


form compute CALYEAR 
tables 1 1 range structure rssdlrange 
changing p. subrc like sy — subrc. 


* Insert source code to current selection field 
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ж $*$ begin of routine — insert your code only below this line ж-ж 
DATA:1 idx LIKE sy – tabix. 
READ TABLE 1 t range WITH KEY 
fieldname = CALYEAR . 
1 idx = sy - tabix. 
1 t range - fieldname = CALYEAR . 
1 t range-sign2 T . 


1 t range — option = ВТ. 


CLEAR 1 year. 
] year = sy - datum(4). 


1 t range — low = l_year. w MARE 
1 t range — high = 9999, "9999 年 
ІСІ idx < > 0. 

MODIFY 1 t range INDEX 1 зах. 
ELSE. 

APPEND 1 t range. 
ENDIF. 


p. subrc -0. 


ж $*$ end of routine — insert your code only before this line ж-ж 


endform. 


5.3.4 在 数据 传输 进程 中 使 用 报表 变量 


上 面 两 个 小 节 ， 对 在 DTP 中 对 数据 的 选择 进行 了 详细 的 描述 ， 但 是 这 样 的 选择 条 件 都 
是 建立 在 已 知 既 有 规则 等 前 提 条 件 下 的 。 如 果 用 户 希 望 在 运行 DTP 时 弹出 对 话 框 ， 进 行 
由 选择 ， 则 需要 使 用 报表 变量 作为 选择 条 件 。 

下 面 以 最 常见 的 OFISCPER 会 计 年 度 期 间 为 例 ， 对 使 用 报表 变量 作为 DTP 中 的 选择 条 件 
进行 详细 说 明 。 由 于 报表 变量 大 多 数 时 间 都 是 在 报表 中 使 用 ， 因 此 不 妨 对 DTP 使 用 的 报表 
变量 给 出 特殊 命名 ， 如 以 “YDTP_” 开 头 ， 这 样 在 变量 的 增强 程序 中 ， 对 于 非 “YDTP_” 
开头 的 变量 ， 便 使 用 常规 的 方式 进行 编写 〈 详 见 第 7 章 ) ， 对 于 以 “YDTP_” 开 头 的 变量 ， 
则 使 用 特殊 逻辑 进行 处 理 ， 具 体 步骤 如 下 。 

第 1 步 : 在 Query Designer 中 新 建 OFISCPER 的 DTP 变量 ,将 该 变量 命名 为 YDTP_FTS- 
CPER_NUI。 由 于 后 续 需 要 使 用 代码 对 变量 的 值 进行 操作 ， 因 此 变量 的 类 型 必须 设置 为 “ 客 
PEO”, ШІЕІ5-22 所 示 。 
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[E == == crima 
ФИ 198- 
常规 | 车 换 路 径 | 详细 信息 | нін | 货币 /单位 | 扩展 | 


Tut 
|DTP_ 用 户 输入 会 计 期 间 范 转 
Г 使 用 标准 文本 


技术 名 称 
[YDTP. FISCPER NUI 


变量 类 型 
特征 值 
处 理 根据 
[amu Z] 
参考 特征 

[OFISCPER] 会 计 年 度 / 期 间 


最 后 更 改 
所 有 者 : PAHXIE 
Bp : PAHXIE 

日 期 时 间 : 11/10/2010 11:50:54 АМ 


图 5-22 设置 变量 类 型 


在 变量 的 “详细 信息 ”标签 页 ， 设 置 “变量 表示 ”为 “间隔 ” ， 然 后 选择 变量 为 “可 
选 的 ”， 并 取消 勾 选 “变量 已 输入 就 绪 ” 复 选 框 ， 如 图 5-23 所 示 。 


[E =s == cams 
多 | 加 | 中- 
* | mas ER 


jetë | 货币 /单位 | 扩展 | 

基本 设置 

变量 表示 

а) Дә 品 

жне 

[mk о о о о о ы 
变量 已 输入 就 绪 

厂 变量 无 上 下 文 


个 性 化 
复制 该 变量 的 个 性 化 数据 


5-23 ”变量 的 详细 信息 设置 


针对 OFISCPER 的 报表 变量 YTDTP_FISCPER_NUI 新 建 完毕 后 ， 将 在 后 续 的 DTP 设置 中 
使 用 该 变量 。 

第 2 步 : 由 于 标准 的 DTP 报表 变量 并 没有 指定 屏幕 供用 户 手工 输入 ， 因 此 必须 先 定义 
一 个 屏幕 。 定 义 的 屏幕 不 仅 给 当前 的 变量 使 用 ， 而 且 还 可 以 给 其 他 变量 使 用 ， 因 此 我 们 定义 
的 屏幕 必须 是 动态 的 。 然 后 设 定 屏幕 编号 为 0100， 包 含 对 象 名 称 以 及 标准 的 Range Table, 
770 


即 有 “对 象 *”“ 对 象 “ 低 ，” 值 ”“ 对 象 “高 ” 值 ” 和 两 个 功能 按钮 ( 即 “ 确 定 ” 和 “取消 ” 
按钮 ) ШЕ 5-24 ~ 图 5-26 所 示 。 


屏幕 号 码 100 | 活动 
属性 Желі 逻辑 流 
常规 属性 文本 /输入 输出 模板 “| ”特殊 属性 显示 属性 — 修正 组 /功能 ә 
E БЕШ 屏幕 元 素 类 型 行 5) Пе | 可 .| 高 度 | 可 .| 格式 ЖАЗЫҚ 330 Піс 588. [Property list 
FLD TEXT 输入 /输出 | s 2| 28| 28| 1| 口 CHAR |O |A = 属性 
FLD LOW 输入 /输出 | 3| 32| 23 23| ЦО CHAR | 回 | 回 = 属性 
О TEXT 输入 /输出 | 3 57 10 10) 1| 0O CHAR | 口 | 回 = 属性 
FLD HIGH 输入 /输出 | 3| 69| 22 22| 105 сна | 回 | 回 
BTN OK 按 5| 47| 9| 9| 1 DE =» 属性 
BTN CANCEL 按 | 562 9 9 1 Dn 
OK CODE 确定 ol 0| 20| 20] 1|[1|OK 口 ср Elt 
15-24 调用 屏幕 元 素 清单 定义 
屏幕 SB 码 (| 100 җа} 
ЕН Жегі 逻辑 流 
常规 属性 | 文本 /输入 输出 模板 | ”特殊 属性 ттЕН (ume == 
E gsm ЕЕ. |5. | 第 .. | 第 .. |5. [Switch Reaction to Switch $A. IEAA | 可 能 .，| 功 能 
йі 口 
LD LOW 输入 / a o 
O TEXT 输入 / a D 
输入 7 a| 口 
N OK jg “| o BTN OK 
BTN CANCEL] 按 | aj o BTN_CANCEL 
K CODE 确定 | aj o 
| 3 


5-25 ”调用 屏幕 功能 按钮 定义 


屏幕 号 码 100| ж 


属性 | лжи 45 


PROCESS BEFORE OUTPUT. 
MODULE status 0100. 


P 
PROCESS AFTER INPUT. 
CHAIN. 
FIELD:fld low, fld high. 
MODULE user command 0100. 
MODULE check value. 
ENDCHAIN. 
MODULE user leave. 


„тео зоосу 


m a= 


5-26 调用 屏幕 逻辑 流 定义 


最 终 通过 预览 可 以 查看 到 ， 屏幕 会 随 着 变量 的 不 同 而 切换 不 同 的 文本 名 称 ， 如 图 5-27 
所 示 。 
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屏幕 编号 0100 活动 


图 5-27 调用 屏幕 界面 定义 概览 


第 3 步 : 在 用 户 出 口 EXIT. SAPLRRSO. 001 中 对 包含 程序 ZXRSRUOI 进行 代码 的 编写 ， 


为 了 区 分 标准 报表 变量 和 DTP 报表 变量 ， 通 过 内 置 不 同 的 函数 对 两 者 进行 隔离 处 理 ， 详 细 
代码 如 下 。 
ж $ ж 
*& 包含 程序 。 ZXRSRUOI 
*& * 
* 如 果 变 量 中 包含 ОТР 等 字样 , 则 调用 DTP 对 话 窗 口 程序 进行 处 理 
否则 直接 调用 一 般 变量 处 理 函 数 进行 处 理 
IF i vnam CS DTP . 
CALL FUNCTION Y OLAP. VAR, DTP. DIALOG EXIT 
EXPORTING 
i vnam ші vnam 
1 t var range -1 t var range 
Па info ші s cob pro 
1 step ші step 
IMPORTING 
e 1 range те 1 range. 
ELSE. 
CALL FUNCTION Y OLAP. VAR, NORMAL EXIT 
EXPORTING 
1] vnam ші vnam 
] vartyp ші vartyp 
i iobjnm ші iobjnm 
i s cob pro ші s cob pro 
i s rkbld =і s rkbld 
l] periv ші periv 
1 t var range -1 t var range 
1 step ші step 
IMPORTING 
e 1 range те Іі range 
e meeht = е meeht 
e mefac -е mefac 
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e waers ше waers 


e whfac ше whfac 
CHANGING 
с s customer -с s customer. 
ENDIF. 
函数 组 全 局 数据 定义 如 下 : 


FUNCTION - POOL y. var. 


DATA:ok code LIKE sy - ucomm. 
DATA : wa, range TYPE rrrangesid. 


DATA :btn, ok(10) , 
btn, cancel( 10). 


РАТА: 4 text( 10) , 


to text(4). 

DATA ; Па low LIKE rscsel - ilow. i, 
fld high LIKE rscsel – ihigh i, 
int. low LIKE fld. low, 
int, high LIKE fld, high. 


DATA :fld text leng ТҮРЕ i. 


FIELD -SYMBOLS: « fld low > TYPE any, 
«fld high » TYPE any. 


DATA :gv. convert LIKE rsconvert , 
gv txtsh ТҮРЕ rstxtsh. 


DATA : p. subrc LIKE sy — subrc, 


p. error LIKE rsconverr. 


DATA:gv var TYPE  rziO, sx var, 


without, intval. 


DATA :rg var TYPE REF TO data. 


" MESSAGE -ID .. 


ЗЕРИ y оар. var. dtp. dialog exit 定义 如 下 : 
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FUNCTION y. оар. var. dtp dialog exit. 


ж 


ж" ж "Local Interface: 


ж"  [MPORTING 


ж REFERENCE(I VNAM) ТҮРЕ RSZGLOBV - VNAM 

ж REFERENCE(I T VAR RANGE) ТҮРЕ RRS0 T VAR RANGE 
ж" REFERENCE(FLD INFO) ТҮРЕ RSD 5 СОВ PRO 

жн REFERENCE(I STEP) TYPE I 

ж" EXPORTING 

ж REFERENCE(E T RANGE) ТҮРЕ RSR T RANGESID 

ж" EXCEPTIONS 

ж CREATE RANGE ERROR 


DATA :i TYPE 1. 
DATA : max. c. 
FIELD ~ SYMBOLS; «rg var» TYPE STANDARD TABLE, 
«fs» TYPE any. 
DATA :fld t cat TYPE  lvc t fcat, 
fld s cat TYPE  lvc s fcat. 


DEFINE add field. 
add 1 to fld s cat — col. pos. 
fld s cat – fieldname = &I' . 
fld s cat – datatype = &2. 
fld s cat - inttype = &3. 
fld s cat — intlen = «4. 
fld s cat – convexit = &5. 
append fld s cat to fld. t. cat. 

END - OF - DEFINITION. 

CHECK sy - pfkey = 200D . 

CHECK i vnam(5) = YDTP'. 

CHECK i step = 0. 

CHECK sy - batch IS INITIAL. "后 台 无 法 执行 


CALL FUNCTION RZI VARIABLE СЕТ 


EXPORTING 

i vnam ші vnam 
IMPORTING 

e sx var = бу var 
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EXCEPTIONS 
variable not found = 1 
OTHERS 22; 


TEM ck ck ck ck ck ck ck ck ck cR ck ЖЖ ЖЖЖ CR GR ck Ch cR ck ch cR GA 


ж 根据 ]_var - VPARSEL 决定 如 何 选择 屏幕 ж 


*P: 单 一 值 Е 
НДІ $ 
* 空白 :默认 无 屏幕 ж 


ЖЖЖ Жожо ЖЖЖЖ КЖ ЖЖЖЖ ЖОЖ k k k k k k Ж 
CALL FUNCTION Y OLAP VAR. GET CONVERT 
EXPORTING 
fld info = fld, info 
IMPORTING 


] convert - gv. convert. 


Па text = fld info - txtsh. 


fld text leng = strlen( fld text ) ж cl abap char utilities = > charsize. 


CASE gv. var — vparsel. 
WHEN P OR Т. "Single or Interval 
IF gv var - vparsel = Р. 
without, intval = X . 
ENDIF. 
to text = 到 (001). 
IF gv. convert – type EQ І OR ру convert – type ЕО s OR 
gv. convert – type EQ' Б OR ру convert – type EQ F . 
ASSIGN int low TO «fld low >. 
ASSIGN int. high ТО «fld high >. 
ELSEIF gv. convert – type NE. Р. 
ASSIGN int. low( gv. convert — clength) TO 
«fld low > ТҮРЕ gv. convert - type. 
ASSIGN int. high( gv. convert - clength) TO 
«fld. high > TYPE gv convert – type. 
ELSE. 
ASSIGN int, low( gv. convert - clength) TO «fld low > 
TYPE gv. convert — type 
DECIMALS gv. convert - decimals. 
ASSIGN int. high( gv. convert - clength) TO «fld high > 
TYPE gv. convert — type 
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DECIMALS gv. convert - decimals. 
ENDIF. 


fld low =< fld. low >. 
fld high =< fld high >. 
int low =< fld. low >. 
int high =< fld high >. 


CALL SCREEN 0100 STARTING AT 25 6 
ENDING AT 120 10. 
IFsy - ucomm = ВТМ CANCEL ." 取消 
MESSAGE e398(00) WITH 停止 执行 . 
ENDIF. 
CLEAR wa range. 
wa range -sign2 1 . 
IF «fld high > IS NOT INITIAL. 
IF int high > int low. 
wa range – opt = ВТ. 
wa, range — low = int. low. 
wa, range — high = int, high. 
ELSE. 
wa range – opt = EQ . 
wa range — low = int, low. 
ENDIF. 
ELSEIF «fld low » IS NOT INITIAL. 
wa range – орі = ЕО. 
wa, range - low = int, low. 
ELSE. 
DEFINE get empty range. 
clear ма range. 
wa range – opt = ВТ. 
wa range - sign = T. 
case gv, convert — type. 
when N . 
case gv. convert — convexit. 
when PERIS . 
ма range — low = 19001. 
wa range — high = 99994 . 
when PERIG . 
wa, range — low = 190001. 
ма range — high = 999912 . 
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when PERI7 . 
wa, range — low = 1900001. 
wa, range — high = 9999016 . 
when others. 
clear i. 
do gv. convert - clength times. 
wa range – low +1(1) = 0 . 
wa range — high c i(1) = 9 . 
add 1 to i. 
enddo. 
endcase. 
when С. 
И &1 = BT. 
if gv. convert - lower is initial. 
max с- Z. 
else. 
max с- 7. 
endif. 
clear i. 
do gv_convert — clength times. 
wa range -low +i(1)=0. 
wa range — high +1(1) = max c. 
add 1 to i. 
enddo. 
else. 
wa range – opt = СР. 
wa range -low2 Ж. 
endif. 
when С. 
wa range -орі- СР. 
wa range -low2 # . 
when D . 
wa, range — low = 19000101. 
wa, range — high = 99991231. 
when Т. 
wa, range - low = int, low. 
wa range — high = 235959 . 
when Sor і ог b or F or P. 
exit. 
endcase. 


END - OF - DEFINITION. 
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get empty range BT . 
ENDIF. 
APPEND wa, range TO е t range. 
WHEN OTHERS. " S OR М ,选择 选项 或 多 个 单 值 


FREE :fld t cat,fld s cat. 
add_field:sign CHAR' C 1 space, 
ор! CHAR' C 2 space, 
low gv. convert — dynptype gv. convert — type gv. convert — ddic Тепе gv. convert — convexit , 


high gv. convert — dynptype gv. convert — type gv. convert — «с leng gv. convert — convexit. 


CALL METHOD cl, ау table create = > create. dynamic, table 


EXPORTING 

it fieldcatalog = fld t cat 
IMPORTING 

ep. table -rg var 
EXCEPTIONS 

generate subpool dir full =1 

OTHERS E 


IF sy - subre < > 0. 
RAISE create, range. error. 
ENDIF. 
ASSIGN rg var -> ж TO «rg var». 


DATA .title LIKE sy – title. 


title = Па text. 


CALL FUNCTION COMPLEX SELECTIONS DIALOG 


EXPORTING 
title - title 
just. incl = X 
TABLES 
range -«rg var» 
EXCEPTIONS 
no range tab ESI 
cancelled -2 
internal error =3 
invalid, fieldname -4 
OTHERS ш5. 
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IF sy -ucomm = ECAN ." 取 消 执行 . 
MESSAGE e398(00) WITH 停止 执行 . 
ENDIF. 


LOOP AT «rg var» ASSIGNING «fs». 
MOVE - CORRESPONDING «fs» TO wa range. 
IF ма range – opt < >' BT AND wa range -opt <> NB . 
CLEAR wa, range — high. 
ENDIF. 
APPEND wa range TO e t range. 
ENDLOOP. 


IF sy - subre < > 0. 

get empty range CP . 

APPEND wa range TO e t range. 
ENDIF. 


ENDCASE. 


ENDFUNCTION. 


Z&75 PK, у оар. var. get. convert 定义 如 下 : 


S 


FUNCTION y. olap. var. get. convert. 


ж" ж "Local Interface: 


ж"  [MPORTING 


ж VALUE(FLD INFO) ТҮРЕ  RSD 5 СОВ PRO 
ж" EXPORTING 
x" VALUE(L_CONVERT) TYPE RSCONVERT 
"m 

] convert — type = fld. info ~ inttp. 

l convert — length = fld. info — byteleng. 

1. convert — clength = fld. info ~ intlen. 

] convert — convexit = fld. info — convexit. 

l convert — olength = fld. info — outputlen. 

] convert - decimals = fld, info — decimals. 


] convert - ddic leng = Й4 info — digits. 
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IF І convert - clength > 45. 
1. convert - clength = 45. 
ENDIF. 


ENDFUNCTION. 


*8 42b. ТЕ DTP 中 使 用 变量 YDTP. FISCPER, NUI, 首先 在 DTP 的 维护 界面 单 击 “过 滤 
Ж” 81, Anl 5-28 所 示 。 


JEDE TEE ЖЕ 


< = Ta UH 9 % E uj gà | П 5 B сенин ”更改 为 实时 DTP ”RDA 监控 器 ”关联 的 标准 数据 传输 流程 ”最 后 -次 请 求 dB 


数据 传输 流程 DEMO 001 -> DEMO СОЦ I 
标识 [DTP 003N89E9KQ6D690CK97Q8PC6G | 
数据 传输 进程 的 类 型 | 标准 的 (可 以 计划 的 ) М 
版 本 о ”|A 激 活 的 |X 已 保存 了 
增 里 状态 1 (зж), 尚 无 请 求 ~ 
提取 上 更 新 “执行 | 
数据 源 G ”10050 数据 存储 对 象 v| = 
[DEMO 001 
Demo DSO 01 
提取 模式 p | 
口 仅 获取 增 里 一 次 E 语义 组 
口 通 过 申请 获取 所 有 的 数据 请 求 
] 增 里 初始 化 《〔 无 数据 ) 
包 大 小 [50,000 


图 5-28 DTP 维护 界面 
此 时 系统 会 弹出 “过 滤器 ”对 话 框 ， 如 图 5-29 所 示 。 
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区 过 天 器 

E 更 改选 择 

Xcelsius 面 板 1 је) 回回 
会 计 年 度 /期 间 | > | (c 
则 年 变 式 | 回回 
数据 记录 Г 回回 
更 新 模式 | EA 


В 5-29 “过 滤器 ” 对 话 村 


ІН 


在 “会 计 年 度 / 期 间 ” 最 后 面 的 按钮 中 单 击 名 ， 系 统 弹出 变量 选择 界面 ， 如 图 5-30 所 示 。 


[er 使 用 联机 分 析 处 理 处 理 器 的 变量 


OLAP 变量 1 i 
тті 
变星 评估 的 结果 
符 , 选 .. 起 始 值 截止 值 团 
419 4» | 
СА Ен 


5-30 变量 选择 界面 1 


ТЕ “ОТАР 变量 ”文本 框 中 输入 框 单 击 帮助 按钮 回 ， 进 入 如 图 5-31 所 示 的 界面 。 


Ге BEx 变星 
选择 字段 : FISCPER 
选择 字段 的 数据 类 型 : NUMC 
选择 字段 的 长 度 : 7 
分 本 的 信息 对 象 веле BL. КЕ “| 基本 特征 
OFISCPER NUMC 7 0ҒІЗСРЕВ 
|н ^ 
图 У 
4» 4» 


可 显示 BEx 变量 的 限制 


变量 值 的 最 小 长 度 : 7 
变星 值 的 最 大 长 度 : һ | 
OR CHAR МР NUMC ONR INT ONR DEC 
OR DATS OR ТІМ5 口 其 它 数据 类 型 
О ЛАТЫ BEx 变量 
| BEx 变量 
B gH вена B. 长 .… 描述 m 
|” [ere FISCPER МОЦ OFISCPER NUMC 7 ”DTP_ 用 户 输入 会 人 
| отр. FISCPER NUO OFISCPER NUMC 7 ”DTP_ 用 户 输入 会 ” 
| 
| 
| 
| 
| 
m 
| 
| 
| + 
4» 41? 


eS e Sx) 


K 5-31 变量 选择 界面 2 
在 图 5-31 中 可 以 看 到 被 用 作 DTP 变量 输入 的 变量 列表 ， 此 时 选择 需要 的 “YDTP_FIS- 


CPER_NUI”， 双 击 回 到 之 前 的 选择 界面 ， 可 以 看 到 ， 系 统 将 需要 的 变量 已 经 写 人 到 变量 窗 
格 中 ， 如 图 5-32 所 示 。 


E 使 用 联机 分 析 处 理 处 理 器 的 变量 


OLAP 变量 [Ge тізең mui] 问 

财 年 变 式 K4 

变量 评估 的 结果 

符 . 选 .. 起 始 值 截止 值 团 

4» <, 
ДЕЗЕ 


图 $-32 ”变量 选择 界面 3 
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确定 完成 后 ， 返 回 DTP 的 维护 界面 可 以 看 到 ， 此 时 在 “过 滤器 ”按钮 后 面 出 现 了 绿色 
的 “对 钓 ”标识 ,表明 变量 设 定 已 经 成 功 ， 如 图 5-33 所 示 。 


EPE AE IRE 

€ — taU %9 % EB n П 4 B снна ”更改 为 实时 DTP кра 监控 器 关联 的 标准 数据 传输 流程 ”最 后 -次 请 求 dB 
数据 传输 流程 DEMO 001 -> DEMO_C01 
标识 ОТР 003N89ESKQ6D690CK97Q8PC6G 
数据 传输 进程 的 类 型 标准 的 (可 以 计划 的 ) M 
版 本 а [т “Хаж” 
BERS 1 “13 活动 , ES ES Y 


数据 源 б [0050 数据 存储 对 象 ” = 
DEMO 001 
Demo DSO 01 
提取 模式 ова - [E 过 滤器 v 
RANEE- -一 一 一 
了 通过 申请 获取 所 有 的 数据 请 求 
门 增 里 初始 化 《无 数据 ) 
包 大 小 50,000 


图 $-33 变量 设 定 成 功 
第 5 Ж: 执行 该 DTP， 让 系统 弹出 我 们 设计 好 的 对 话 框 ， 如 图 $-34 所 示 。 


ЦЕ з Н 


会 计 年 度 /期 间 到 


图 5-34 DTP 执行 时 的 变量 输入 界面 
5.3.5 单元 小 结 


A Г Е DTP 中 对 数据 来 源 文件 以 及 文件 的 内 容 进行 动态 选择 ， 对 数据 来 源 
文件 的 动态 选择 可 以 在 信息 包 中 了 予以 实施 ， 而 对 文件 的 内 容 动 态 选择 可 以 在 转换 中 予以 实 
施 。 正 如 我 们 所 讨论 的 那样 ， 实 际 的 项 目 在 哪个 节点 进行 代码 的 增强 ， 取 决 于 系统 的 结构 以 
及 系统 的 管理 规范 ， 通 常 的 原则 是 “在 实施 简易 的 节点 进行 功能 的 实施 ， 在 需要 更 少 维护 
工作 量 的 节点 予以 实施 ”。 


54 层次 结构 的 处 理 


在 实际 项 目 中 ,不 像 属 性 和 文本 主 数据 那样 ， 随 便 、 临 时 地 就 能 制作 相关 数据 并 上 和 载 到 系 
统 中 ， 对 层次 结构 的 处 理 总 是 显得 不 那么 得 心 应 手 。 本 节 先 介绍 采取 АВАР 程序 处 理 的 方法 进 
行 层 次 结构 的 下 载 ， 再 使 用 3. X 新 建 信息 源 的 方式 上 载 层 次 结构 。 然 后 将 介绍 如 何 采用 АВАР 
程序 的 方式 从 标准 的 层次 结构 表 中 自动 产生 层次 结构 。 


5.4.1 层次 机 构 的 同步 (下载 + 上 载 ) 


1. 应 用 场景 描述 
用 户 在 开发 系统 中 对 层次 结构 维护 完毕 后 ， 需 要 再 次 在 生产 系统 中 维护 一 次 ， 或 用 户 在 
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生产 系统 中 维护 了 层次 结构 的 新 的 层次 节点 。 由 于 在 开发 系统 中 没有 对 应 的 节点 ， 因 此 导致 
报表 在 对 特性 值 做 限定 时 看 不 到 对 应 的 节点 。 用 户 希 望 系 统 能 够 提供 相关 的 工具 进行 层次 结 
构 的 同步 。 

2. 层次 结构 的 下 载 处 理 

假设 ， 在 开发 环境 中 针对 某 公 司 代 码 有 以 下 层次 结构 ， 我 们 需要 将 层次 结构 进行 下 载 ， 
然后 上 载 到 生产 环境 中 。 某 公司 代码 的 层次 结构 如 图 5-35 所 示 。 


EX "公司 代 码 层 次 结构 ' 修改 : ' 已 修改 的 版 本 ' 


ajola]: || 维护 等 级 | 层次 结构 居 性 |1 ||| Т--ПЕЦШЕЦЕ) 
[05% [ 口 特性 节点 [Оланы [е [8] | [ ] [Se[E3] 


公司 代码 层次 结构 o [mms [# [ii 
vo ABE GOGSDM 0001 |” 
v Æ EA GOGSDM 1000 [^ 
A 中 国 公司 GOGSDM 1001 D 
КЕ GOGSDM 1002 C 
„Ё n — — —.....G0GSDM 1003 Г). 
“ЖЫН MN GOGSDM 2000 | i 
A 法 国 公司 GOGSDM 2001 门 
Æ SJ GOGSDM 2002 D 
Ё (SERI GOGSDM 2003 C 
Ё а/а GOGSDM 2004 [^ 


5-35 ” 某 公司 代码 的 层次 结构 


第 1 步 : 在 BW 开发 环境 中 实施 如 下 代码 : 


жож жж ЖЖЖ ЖОЖ ЖОЖ ЖОЖ ЖОККО ЖОЖ ЖОЖ ЖОЖ КК ЖЖЖ ЖЕ ЖОЖ КЖК ЖОК КЖ ЖЖ ЖОЖ k k k k k k k k k k Ж 
* 本 程序 能 够 将 信息 对 象 的 层次 结构 按照 指定 的 方式 下 载 到 本 地 文本 文件 

* 然后 通过 BW 3. X 层次 结构 信息 源 以 IDOC 的 方式 上 载 到 其 他 BW. 系统 

Жожо Ж ЖОЖ ЖОЖ ЖЖЖ ЖОЖ КЖ Ж ЖЖ ЖоК ЖОЖ ККК ЖОЖ ЖК ЖОЖ ККЖ k k КЖ ЖОЖ ЖОЖ k k k k k k k k k k Ж 
* P IOBJNM 信息 对 象 技术 名 称 

ж P DATETO ХЕ ap AUR 
* P FNAME 文件 名 称 

* P HIENM 层次 结构 名 称 

ж P INTER 是 否 包 含 范围 节点 

ж P DATES 是 否 包含 与 时 间 相 关 的 节点 

ж P_LANGU 语言 

ж P VERS 层次 结构 版 本 

ЖЕЖЖЖЖЖЖЖЖЖЖЖЖ ЖЖЖ ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ ЖЖЖ ok ak k k ak ak k k ak k k ak k k k 
REPORT y_hierarchy_download. 

TYPE – POOLS :rs , rsdm ,rrh1. 

SELECTION - SCREEN BEGIN OF BLOCK bl WITH FRAME TITLE text — 001. 

PARAMETERS: 

p_iobjnm TYPE rsdiobjnm MEMORY ID төс. 

SELECTION - SCREEN END OF BLOCK bl. 

SELECTION - SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text - 002. 

PARAMETERS: 
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p. hienm TYPE rshiedir – hienm, 

p. vers TYPE rshiedir - version, 

p. dateto TYPE rshiedir — dateto , 

p. langu TYPE rshiedirt – langu. 
SELECTION - SCREEN END OF BLOCK b2. 
SELECTION - SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text — 003. 
PARAMETERS: 

p. пате LIKE rlgrap - filename, 

p. dates AS CHECKBOX DEFAULT X , 
p_inter AS CHECKBOX DEFAULT X . 
SELECTION - SCREEN END OF BLOCK b3. 
* ЖЇК 

TYPES: 

ж 不 含 范围 节点 和 时 间 相 关节 点 
BEGIN OF y. s hierfile 1, 

nodeid TYPE rshienodid , 

iobjnm TYPE rsiobjnm, 

nodename TYPE rsnodename, 

ж (level TYPE rstlevel ， 

link TYPE rslink ， 

parentid TYPE rsparent, 

childid TYPE rschild , 

nextid TYPE rsnext, 

langu TYPE langu, 

txtsh TYPE rstxtsh , 

txtmd TYPE rstxtmd ， 

txtlg TYPE rstxtlg, 

END OF y. s hierfile 1, 

y t hierfile 1 TYPE STANDARD TABLE OF y в hierfile 1, 
ж 只 包含 时 间 相 关节 点 

BEGIN OF y. s hierfile 2, 

nodeid TYPE rshienodid , 

iobjnm TYPE rsiobjnm, 

nodename TYPE rsnodename, 

ж tlevel TYPE rstlevel , 

link TYPE rslink , 

parentid TYPE rsparent, 

childid TYPE rschild , 

nextid TYPE rsnext, 

dateto TYPE rsdateto , 

datefrom TYPE rsdatefrom , 

langu TYPE langu, 

ixtsh TYPE rstxtsh , 
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txtmd TYPE твіхіша, 

txtlg TYPE rstxtlg, 

END OF y. s hierfile 2, 

y t hierfile 2 TYPE STANDARD TABLE OF y. s hierfile 2, 
* 只 包含 范围 节点 

BEGIN OF y. s hierfile 3, 

nodeid TYPE rshienodid , 

iobjnm TYPE rsiobjnm, 


nodename TYPE rsnodename, 
ж tlevel TYPE rstlevel , 

link TYPE rslink , 

parentid TYPE rsparent, 
childid TYPE rschild , 

nextid TYPE rsnext, 

leafto TYPE rsleafto, 

leaffrom TYPE rsleaffrom, 
langu TYPE langu, 

txtsh TYPE rstxtsh , 

txtmd TYPE rstxtmd ， 

txtlg TYPE rstxtlg, 

ЕМ) OF y_s_hierfile 3, 
y_t_hierfile 3 ТҮРЕ STANDARD TABLE OF у s hierfile 3, 
* 包含 时 间 相 关节 点 和 范围 节点 
BEGIN OF y. s hierfile 4, 
nodeid TYPE rshienodid , 
iobjnm TYPE rsiobjnm, 
nodename TYPE rsnodename, 
ж tlevel TYPE rstlevel , 

link TYPE rslink , 

parentid TYPE rsparent , 
childid TYPE rschild , 

nextid TYPE rsnext, 

dateto TYPE rsdateto , 
datefrom TYPE rsdatefrom , 
leafto TYPE rsleafto, 

leaffrom TYPE rsleaffrom, 
langu TYPE langu, 

txtsh TYPE rstxtsh , 

txtmd TYPE rstxtmd ， 

txtlg TYPE rstxtlg, 

ЕМ) OF y_s_hierfile 4, 
y_t_hierfile 4 ТҮРЕ STANDARD TABLE OF у s hierfile 4. 
* 层次 结构 的 定义 
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DATA: 

g s hiesel TYPE rsndi s hiesel, 

g s hiedir TYPE rsndi s hiedir, 

g subrc TYPE sy – subrc, 

еі hiedirt TYPE TABLE OF rshiedirt , 

g s hierstruc TYPE rssh, s Мар, 

g t hierstruc TYPE TABLE OF rssh, ѕ htab, 

g s thiernode TYPE rsthiernode, 

g t thiernode TYPE TABLE OF rsthiernode WITH KEY langu hieid objvers 
nodename , 

6 s hierintvl TYPE rssh, 8 jtab, 

g t hierintvl TYPE TABLE OF rssh s jtab WITH KEY hieid objvers nodeid, 
g s message TYPE төпді s message, 

g t message TYPE TABLE OF тѕпаі s message, 
g s chavlinfo TYPE rsdm s chavlinfo, 

g t chavlinfo TYPE rsdm t. chavlinfo. 

ж 文件 的 处 理 

DATA: 

g fname TYPE string, 

g struct s TYPE string, 

g struct t TYPE string, 

gr s file TYPE REF TO data, 

gr t. file TYPE REF TO data. 

FIELD - SYMBOLS: 

«g langu » TYPE ANY, 

«g s file» TYPE ANY, 

«g t file» TYPE STANDARD TABLE. 


* 


AT SELECTION - SCREEN ON VALUE - REQUEST FOR p. iobjnm. 
CALL FUNCTION RSD IOBJ. F4 


EXPORTING 

і show. cha -rs c true 

i objvers -ів c objvers — active 

i hietabfl -ів c true 
CHANGING 

c. iobjnm = p. iobjnm 
EXCEPTIONS 

illegal input =1. 


CHECK sy - subrc = 0. 


ж 


ж 层次 结构 的 搜索 帮助 


ж 
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АТ SELECTION – SCREEN ON VALUE - REQUEST FOR p. hienm. 
DATA: 
1. hiertxt TYPE rrhl, s hiertxt, 
] t hiertxt TYPE зһ t. hiertxt. 
CALL FUNCTION RRHI HIERARCHY HELP VALUES GET 


EXPORTING 
i iobjnm = p. iobjnm 
1 dateto = p. dateto 
i hienm = p. hienm 
1 version -р. vers 
IMPORTING 
e t hiertxt =] t hiertxt 
EXCEPTIONS 
no, fA. available ES! 
dialogue canceled =2 
OTHERS =з. 


CHECK sy - subre = 0. 

READ TABLE l1 t hiertxt INTO 1 s hiertxt INDEX 1. 
CHECK NOT 1 s hiertxt IS INITIAL. 

p. епт -] s hiertxt — hienm. 

DATA: 

1 s dynpfields TYPE dynpread , 

1 t. dynpfielas TYPE STANDARD TABLE OF dynpread. 
CLEAR: 11 dynpfields, 1 s dynpfields. 

1 s dynpfields - fieldname = P VERS . 

WRITE 1 s. hiertxt — version TO 1. s dynpfields - fieldvalue. 
APPEND 1 s dynpfields TO 1 t dynpfields. 

ls dynpfields - fieldname = P. DATETO . 

WRITE 1 s hiertxt — dateto TO 1, в dynpfields - fieldvalue. 
APPEND 1 s dynpfields TO 1 t dynpfields. 

CALL FUNCTION DYNP VALUES UPDATE 


EXPORTING 
dyname = sy — гері 
dynumb = ву – dynnr 
TABLES 
dynpfields =l t dynpfields. 
* 
* 文件 名 的 搜索 帮助 


Ж 
АТ SELECTION - SCREEN ON VALUE - REQUEST FOR p. ате. 
DATA: 
1 filenamel TYPE string, 
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1 filename2 TYPE string, 
] path TYPE string, 

] fullpath TYPE string, 

] action TYPE i. 


] filenamel = р ате. 


CALL METHOD сі gui, frontend, services = > file save dialog 


EXPORTING 

window. title = Select Download Filé 

default extension = txt 

default file name = 1 filenamel 

file filter = All Files( ж. ж) | ж.ж | Text files ( * . txt) | ж. txt 
CHANGING 

filename =] filename2 

path -] path 

fullpath -] fullpath 

user action = |] action 
EXCEPTIONS 

cntl, error =] 

OTHERS =2, "SEC NOTEXT 


CHECK sy – subrc = 0. 
CALL METHOD cl gui сім = > flush. 
IF 1. action = 0. 
p. fname = 1 fullpath. 
ENDIF. 


* 


INITIALIZATION. 
GET PARAMETER ID RSC FIELD р iobjnm. 


ж 


START - OF - SELECTION. 
* 检查 输入 条 件 
CHECK NOT p_fname IS INITIAL. 
IF p. langu IS INITIAL. 
p. langu = sy - langu. 
ENDIF. 
IF p. dateto IS INITIAL. 
p. dateto 99991231 . 
ENDIF. 
* 读 取 层 次 结构 的 信息 
CLEAR g s hiesel. 
g s hiesel — objvers = rs. с. objvers — active. 
g s hiesel - hienm = p епт. 


g s hiesel — version = p. vers. 
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g_s_hiesel — iobjnm = p. iobjnm. 
g s hiesel — dateto -р. dateto. 
CALL FUNCTION RSNDI SHIE STRUCTURE GET 
EXPORTING 
1 s hiesel тб s hiesel 


i no nodenm, table —rs c true 


IMPORTING 
e s hiedir -g s hiedir 
е subrc -g subrc 
TABLES 
e t hiedirt -g t hiedirt 
e t hierstruc тв t hierstruc 
e. t thiernode -g t thiernode 
e t hierintvl -g t hierintvl 
е 1 message —g 1 message. 


IF g subre. < > 0. 
READ TABLE о t message INTO с s message INDEX 1. 
IF sy -subrc -0. 
MESSAGE ID g s message — msgid TYPE 1 NUMBER g s message - msgno 
WITH g s message - msgvl g s message — msgv2 
6 s message — швоу3 g s message - msgv4. 
ELSE. 
MESSAGE ID RSBO TYPE І NUMBER 899 
WITH Hierarchy read errot . 
ENDIF. 
EXIT. 
ENDIF. 
* 定义 输出 结构 
IF p. dates IS INITIAL AND p. inter IS INITIAL. 
в struct s Y S HIERFILE 1. 
g struct t = Y T HIERFILE 1. 
ELSEIF p. dates = X AND p. inter IS INITIAL. 
в struct s = Y S HIERFILE 2. 
g struct t Y T HIERFILE 2 . 
ELSEIF p. dates IS INITIAL AND p_inter = X . 
в struct s = Y S HIERFILE 3. 
g struct t Y T HIERFILE 3 . 
ELSE. 
g struct s Y S HIERFILE 4 . 
в struct t Y T HIERFILE 4. 
ENDIF. 
CREATE DATA gr s file TYPE(g struct. s). 
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ASSIGN gr s file -> * TO «g s file». 
CREATE DATA er t file TYPE(g struct 1). 


ASSIGN gr t file -> * TO «g t file». 


* 处 理 节 点 
REFRESH «g t file». 
LOOP AT g t hierstruc INTO g s hierstruc. 
CLEAR «g s file». 
MOVE - CORRESPONDING g s hierstruc TO «g s file». 
ж 处 理 节 点 的 文本 
READ TABLE о t. thiernode INTO g s thiernode WITH TABLE KEY 


langu = p. langu 


hieid 2g s hierstruc - hieid 


objvers = rs c objvers — active 


nodename = g s hierstruc — nodename. 


IF sy — subre -0. 
MOVE - CORRESPONDING g s thiernode TO «g s file >. 


ELSE. 
ж 处 理 特 怕 


E 的 文本 


REFRESH g_t_chavlinfo. 

CLEAR g_s_chavlinfo. 

g s chavlinfo — c_chavl = g s hierstruc - nodename. 

APPEND g s chavlinfo TO g t. chavlinfo. 

CALL FUNCTION RSD CHAVL READ ALL 
EXPORTING 


C 


i iobjnm 

i langu 

i dateto 

i check, value 

i sid in 

1 hieid 

i objvers 
HANGING 

c. t chavlinfo 


EXCEPTIONS 


info object not found 
routines generation error 
check table not existing 
text. table not existing 


OTHERS 


IF sy - subre -0. 
READ TABLE g t chavlinfo INTO g s chavlinfo INDEX 1. 
IF sy -subrc = 0. 


тб s hierstruc – iobjnm 
= p. langu 

= p. dateto 

= space 

= space 

-g s hiedir -hieid 


тб s hiedir — objvers 


-g t chavlinfo 
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MOVE - CORRESPONDING g s chavlinfo — e_chatexts ТО «g s file». 
ASSIGN COMPONENT LANGU OF STRUCTURE «g s file» TO «g langu >. 
IF sy - subre -0. 
< g langu >= p langu. 
ENDIF. 
ENDIF. 
ENDIF. 
ENDIF. 
ж 处 理 范围 节点 
IF g s hierstruc — intervl = X AND p inter = X . 
READ TABLE g t hierintvl INTO g s hierintvl WITH TABLE KEY 
hieid 2 g s hierstruc - hieid 
objvers = rs. с objvers — active 
nodeid = g s hierstruc — nodeid. 
IF sy - subrc -0. 
MOVE - CORRESPONDING g s hierintvl TO «g s file». 
ENDIF. 
ENDIF. 
APPEND <= s file» TO «g t file». 
ENDLOOP. 
ж 下 载 输 出 内 表 
g fname - p. fname. 


CALL FUNCTION GUI. DOWNLOAD 


EXPORTING 

filename -g ате 

write, field. separator = space 
TABLES 

data, tab = «g t file» 
EXCEPTIONS 

file write error ES! 

no, batch 22 

gui refuse, filetransfer =3 

invalid type -4 

по authority =5 

unknown, error =6 

header_not_allowed =7 

separator not allowed =8 

filesize поі allowed -9 

header too. long -10 

dp. error create =11 

dp. error send -12 

dp. error. write -13 
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unknown, dp. error -14 


access denied -15 
ар ош of memory -16 
disk, full -17 
dp. timeout -18 
Ше not. found -19 
dataprovider exception -20 
control flush. error -21 
OTHERS -22. 


IF sy - subrc -0. 
MESSAGE ID RSBO TYPE 1 NUMBER 899 
WITH 层次 结构 成 功 下 载 到 指定 目录 ! . 
ELSE. 
MESSAGE ID sy — msgid TYPE І NUMBER sy - msgno 
WITH sy – msgvl sy - msgv2 sy — msgv3 sy - msgv4. 
ENDIF. 


第 2 步 : 运行 程序 Y_HIERARCHY_DOWNLOAD， 将 层次 结构 下 载 到 本 地 C: \ 根 目录 下 。 
相关 参数 如 图 5-36 所 示 。 


将 BW 的 层次 结构 下 载 到 文本 文件 
© 
信息 对 象 GOGSDII 
层次 结构 ID IDS ALL 
版 本 
层次 结构 有 效 期 到 9999. 12. 31 
语言 ІН 
文件 名 称 CAGSDM.txt B 
连 包 含 时 间 相 关 的 节点 
四 包含 范围 节点 


8 5-36 ”层次 结构 下 载 程序 运行 参数 


注意 ， 此 处 的 “包含 时 间 相 关 的 节点 ”和 “包含 范围 节点 ” 复 选 框 ， 如 果 在 下 载 时 使 
用 了 这 两 个 参数 ， 则 后 续 在 上 载 时 必须 同时 色 选 这 两 个 复 选 框 才 能 正确 上 载 文 件 。 

第 3 步 : 下 载 完毕 ， 系 统 提示 “层次 结构 成 功 下 载 到 指定 目录 !” 信 息 ， 如 图 5-37 
所 示 。 


EEE E 
Елтаева 


85-37 层次 结构 下 载 程序 提示 信息 
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ЖА. 打开 文件 查看 内 容 ， 如 图 5$-38 所 示 。 


可 GSDM -记事 本 Les | E miS] 
XHA SRE ”格式 (O) SEV 帮助 (H) 
00000001606SDI 0001 0000000000000003000000000000000000000000 + 
0000000260GSDM 2000 0000000100000010000000000000000000000000 
000000030050 1000 0000000100000006000000020000000000000000 
00000004G0GSDIN 1003 0000000300000000000000000000000000000000 
000000050650 1002 0000000300000000000000040000000000000000 
0000000660650 1001 0000000300000000000000050000000000000000 
0000000760650 2004 0000000200000000000000000000000000000000 
|000000086065ри 2003 0000000200000000000000070000000000000000 
0000000960650 2002 0000000200000000000000080000000000000000 
0000001 0G0GSDM 2001 0000000200000000000000090000000000000000 
[dl ГП ] 四 
图 5-38 ”层次 结构 下 载 文 件 的 内 容 


3. 层次 结构 的 上 载 处 理 

为 了 从 文本 文件 上 载 层次 结构 到 目标 BW 系统 ， 我 们 需要 借助 BW 3. X 信息 源 ， 通 过 构 
建 信息 源 ， 采 用 IDOC 的 方式 对 层次 结构 进行 上 载 ， 具 体 步骤 如 下 。 

第 1 步 : 在 数据 仓库 管理 员工 作 人 台中， 在 信息 源 的 应 用 程序 组 件 上 ， 右 键 单 击 ， 选 择 创 
建 信息 对 象 公司 代码 的 信息 源 ， 如 图 5-39 所 示 。 


ian s [ve [à [ag | 5 | | e | | ЛЕЛЕРІ 


[TT 技术 名 称 

e 信息 提 世 者 b % НОФЕЗИОТСОННЕСІНУ NODESNOTCONNE... 
вене Ф RFID 独立 解决 方案 9AII 

ыша P ӘЖЕ 0-0 OBWTCT 
© BER Q sio в 1 ZSINO 
GP 数据 源 
源 系统 ті 
% 开放 数据 目标 文件 创建 应 用 程序 组 件 … 
HEr 创建 信息 源 .… 


Bel 收藏 天 


创建 信息 源 3.X 


s 


5-39 创建 信息 源 3. X 


在 弹出 的 对 话 框 中 ， 选 中“ 主 数据 的 直接 更 新 ” 单 选 按钮 ， 并 输入 信息 对 象 的 技术 名 
ЖЖ, ШІ GOGSDM， 如 图 5$-40 所 示 。 


区 创建 信息 源 u _ _ _ u > d 


О 任意 数据 目标 中 的 灵活 更 新 ( 除 结构 外 ) 
信息 源 _ 
长 文本 描述 
模板 -信息 源 


© 主 数 据 的 直接 更 新 
信息 对 象 IGOCSDI B 
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图 5-40 输入 信息 对 象 创建 直接 更 新 的 信息 源 


第 2 步 : 在 新 建 完毕 的 信息 源 下 面 会 出 现 一 个 层次 结构 的 图 标 和 具体 对 象 的 描述 ， 此 时 
单 击 鼠 标 右键 ， 选 择 “ 创 建 传输 规则 ”选项 ， 如 图 5-41 所 示 。 

由 于 我 们 采用 的 是 文本 文件 上 载 的 方式 ， 因 此 在 弹出 的 对 话 框 中 , 选择 文本 文件 源 系 
统 ， 如 图 5-42 所 示 。 
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数据 仓储 工作 台 : 建 模 
ШЕ ш [СЕГЕ ЕД АЕ 


@ 信息 提 世 者 b [77 NODESNOTCONNECTED NODESNOTCONNE... 
ЛГЕН © RFID вожа ЗАП 
н р B RRAS 0BWTCT 
ER v Q SINO 应 用 程序 组 件 EST m 
P 数据 原 7 Алан 60650М = 
源 系统 Ала (раға HIERARCHIES 6065... 
% 开 训 数据 目标 文件 Ка 公司 代码 C 维护 层次 结构 | TEXTS GOGSDM _ 
Шен Z 
国 收藏 夫 
5-41 创建 传输 规则 
蕊 主 数据 - 信息 源 : 分 配 源 系统 E 


5-42 ”选择 文本 文件 源 系 统 


单 击 确定 后 ， 系 统 提 示 文 本 信息 源 是 否 保存 数据 源 分 配 ， 如 图 5-43 所 示 。 
单 击 “ 是 ”按钮 后 ， 系 统 提示 层次 结构 信息 源 是 否 保存 数据 源 分 配 ， 如 图 5-44 所 示 。 


区 保存 修改 吗 ? 


区 保存 修改 吗 ? 四 


数据 源 分 配 G0GSDM_HIER 
到 信息 源 60650М 保存 ? 


数据 源 分 配 G0GSDM_TEXT 
[2] 到 信息 源 GOGSDM 181%? 


图 5-43 SAP 系统 提示 信息 1 5-44 SAP 系统 提示 信息 2 


同样 ， 单 击 “ 是 ”按钮 后 进入 传输 规则 的 维护 界面 ， 系 统 可 能 默认 选择 属性 数据 源 或 
文本 数据 源 ， 这 时 必须 切换 到 层次 结构 数据 源 ， 如 图 5-45 所 示 。 


|60GSDM_TEXT - 公司 代码 (文本 ) n 


]G0GSDM TEXT - 公司 代码 (文本 ) 


图 $-45 数据 源 选 择 
在 弹出 的 对 话 框 中 单 击 “ 是 ”按钮 ， 如 图 5-46 所 示 。 


区 退出 处 理 


信息 源 已 更 改 
Q 。 人 i 起 首 先 保存 3? 


5-46 SAP 系统 提示 信息 3 


进入 层次 结构 的 传输 规则 后 ， 首 先 看 到 的 是 采用 PSA 方式 来 上 载 层次 结构 ， 如 图 5-47 
所 示 。 
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[5] 传 输 结构 /传输 规则 ___ 


源 系 统 EA РС FILE - File System (X) Е] 
数据 源 4% |G0GSDM_HIER -公司 代码 (层次 结构 ) B 
状态 已 修改 的 创建 ps 


状 | 类 型 
ОНІЕНИ О 层次 名 称 ACHAR 30 
HIER VERS OHIER VERS O 体系 版 本 ДСНАЕЗ | m 
ODATETO 口 、 有 效 期 至 AP CHAR 8 
ODATEFROM О 有 效 日 从 ДЁСНАЕ 8 
NORESTNODE ONORESTNODE | O 取消 未 分 本 节点 ДЁСНАК 1 
STARTLEVEL 0STARTLEYEL Г] “开始 追溯 层 ЖЕНІС 2 
NODEPOSIT ONODEPOSIT | [] 节点 位 置 ACHAR 1 
ALEAFNODSP OALEAFNODSP Г] 未 显示 节点 AE CHAR 1 
ALEAFNODCH OALEAFNODCH Г] 可 更 改 显示 | 硬 cHaR1 
-= 
do Ң | (| 


图 5-47 采用 PSA 方 式 的 数据 源 结构 


由 于 我 们 采用 的 是 从 源 BW 系统 下 载 文 本 的 方式 ， 因 此 这 种 方式 不 适用 ， 必 须 切 换 到 
IDOC 方式 ， 如 图 5-48 所 示 。 


| Ed ЕСІ Та а ата 


源 系统 PC FILE - File System (X) ü 
数据 源 ФА |G0GSDM_HIER - 公司 代码 (层次 结构 ) B 
状态 上 已 修改 的 egos | 


ЗЕЕ ДЕБ 


保 特 征 


公司 代码 


图 5-48 RH IDOC 方式 的 数据 源 结构 


进入 IDOC 方式 后 ， 首 先 需要 告诉 系统 我 们 所 上 载 的 层次 结构 技术 名 称 和 文本 描述 是 什 
么 ， 因 此 需要 编辑 层次 结构 的 定义 ， 单 击 “ 层 次 结构 ”按钮 进行 层次 结构 的 定义 ， 具 体 如 
图 5-49 所 示 。 
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GOÜGSDM HIER 
PC FILE 


层次 结构 名 称 IDS ALL 
简要 描述 公司 代码 层次 结构 | 


міх] 


5-49 创建 目标 层次 结构 
由 于 我 们 是 从 源 BW 系统 下 载 的 文件 ， 准 备 上 载 到 目标 BW 系统 ， 因 此 层次 结构 技术 名 
称 最 好 和 之 前 下 载 的 层次 结构 保持 一 致 ， 这 里 仍 叫 作 IDS_ALL 公司 代码 层次 结构 。 确 定 后 ， 
出 现 层次 结构 上 载 的 参数 定义 ， 如 图 5-50 所 示 。 


区 层次 表 头 特性 和 文件 结构 的 维护 

ЭНЕР! GOGSDM HIER 源 系统 PC_FILE 

层次 结构 名 称 IDS ALL 

Hië 公司 代码 层次 结构 

有 效 期 至 有 效 日 从 层次 结构 版 本 

加 已 排序 的 层次 结构 

四 间隔 

МН 

口 源 系统 标识 

ні ER == km m 
іш ID ODEID UIC 8 Е 
信息 对 象 名 称 INFOOBJECT CHAR 30 М 
节点 名 称 NODENAME CHAR 32 

BRER LINK CHAR 1 

高 级 节点 PaRENTID NUNC 

第 一 个 子 节 点 CHILDID UNC 8 

下 一 个 节点 沿 NEXTID ша 8 

日 期 -有效 至 DATETO CHAR 8 

日 期 - 有 效 起 始 日 DATEFROI CHAR 8 

ІШЕ - 21 LEAFTO CHAR 32 [4] 
间隔 -从 LEAFFRON CHAR 32 Е 


5-50 ”层次 结构 上 载 的 参数 定义 


其 中 ,“ 已 排序 的 层次 结构 ” 复 选 框 必须 勾 选 ， 如 果 在 下 载 的 勾 选 了 “包含 时 间 相 关 的 
节点 ”和 “包含 范围 节点 ”两 个 复 选 框 ， 则 对 应 地 在 此 处 必须 勾 选 “时 间 相 关 ” 和 “ 间 
W ANEHE, 

单 击 传输 ， 系 统 提示 是 否 保存 层次 结构 信息 ， 单 击 “ 是 ”按钮 ， 如 图 5-51 所 示 。 


区 退出 处 理 ЕН 


层次 结构 IDS ALL 仍 没有 保存 . 
@ таннін? 


图 5-51 SAP 系统 提示 信息 


此 时 ， 传 输 规 则 维护 完毕 ， 保 存 传输 规则 并 退出 维护 界面 。 
第 3 步 : 在 数据 源 GOGSDM HIER 上 单 击 右键 ， 选 择 “ 创 建 信 息 包 ”选项 ， 如 图 5-52 
所 示 。 在 弹出 的 对 话 框 中 输入 信息 包 的 文本 描述 ， 如 图 5-53 所 示 。 
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数据 仓储 工作 台 : 建 模 


Ф 信 息 提供 者 

Æ вене 

Ә веж 

P SER ` GOGSDM 

IRE ES “Алақ (层次 结构 ) HIERARCHIES GO! 
& 开放 数据 目标 文件 %%с AS 公司 代码 (层次 结构 ) 为 Не System GOGSDM, HIER 
Ман = лава) — 

因 收藏 夫 b @ o длака 


图 5-52 创建 信息 包 


Eae a 


Æ GOGSDM 公司 代码 
E PC FILE File System 


RSNF:GOGSDM. HIER 


OGSDM HIER 


Kd 5-53 输入 信息 包 的 文本 描述 


保存 后 进入 信息 包 参 数 的 设 定 界面 ， 首 先 选择 “层次 结构 选择 ”标签 页 ， 选择 刚 才 新 
建 的 层次 结构 IDS_ALL。 对 于 层次 结构 的 更 新 方法 ， 建 议 保留 系统 默认 更 新 ， 即 “完全 更 


新 ” 单 选 按钮 ， 如 图 5-54 所 示 。 


层次 结构 选择 


加 载 层次 … … 以 及 激活 的 标志 或 者 激活 它 


= 12.31 


更 新 方法 : 回 完全 更 新 ORAA Ош 


图 5-54 选择 目标 层次 结构 并 设置 更 新 方法 
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第 4 步 : 选择 “外 部 数据 ”标签 页 ， 在 文件 名 中 输入 刚才 下 载 的 文件 目录 和 名 称 ， 如 
这 里 的 C: \GSDM. txt。 由 于 层次 结构 需要 更 新 文本 ， 因 此 建议 将 “字符 集 设置 ” 设 定 为 指 
定 的 字符 集 ， 如 这 里 设 定 为 中 文 8400， 如 图 5-55 所 示 。 


外 部 数据 
从 源 系统 加 载 层 次 结构 
装载 外 部 数据 从 加 客户 工作 站 〇 应 用 程序 服务 器 
ze | 数据 文件 a| [D PET Bs 
文件 名 CAGSDM.txt [5 
文件 类 型 © ASCI Seit (CR 分 隔 符 ) 字符 集 设置 / 
O csv 文件 оне Odi 
数据 分 隔 符 % |Гнех | @ 用 户 相关 
退出 符号 # O Hex 字符 集 8400 
普 换 字符 1 

将 被 知 略 的 标题 行 号 ГА] нн 


K5-55 上载 源 文件 的 选择 
第 5 步 : 保存 信息 包 并 上 载 数据 。 数 据 上 载 过 程 监控 如 网 5-56 所 示 。 


ЕСТІ 编辑 (E) BIO 环境 (N) BEO 系统 (Y) 帮助 (H) 


9 САО Bum esae mam o 
监视 器 - 管理 员工 作 簿 
БЕРЕ БЕЗІНБЕРЕЛІГСІ | fé] | [8 ар изве E 


“ Ен 
У СОО 成 功 的 (1) 
了 Д? 6065DM (公司 代码 ) 
v 8 2012.07.17 
. v ВРС РДЕ ( Fie System) | 
@ 22:06:46 ( 11 M 11323 


ER): 一 切 准备 就 绪 
РИ О 安排 数据 请 求 
О 证 实 以 : 确定 
О 提取 (信息 ): 一 切 准备 就 绪 
О 到 达 的 数据 请 求 
О 11 发 送 的 记录 (11 收 到 的 记录 ) 
口 数据 选择 结束 
У O 传输 (Idoc 和 TRFC): 一 切 准备 就 绪 
О 信息 IDoc 1 : 应 用 任 证 已 过 帐 
О 信息 IDoc 3 : AMEH 
О 数据 IDoc 1 : ( 11 记录 ) ЖАРЕ 
О 信息 IDoc 2 : 应 用 优 证 已 过 帐 
了 О 处 理 (数据 包 ): 一 切 准备 就 绪 
О 数据 包 1 ( 11 记录 ) : 一 切 准 备 就 绪 
` D 连续 处 理 (信息 ) : 没有 错误 
口 -> 主 数 据 层次 结构 更 新 开始 
О < 主 数 据 层 次 结构 更 新 结束 
О 成 功 激活 层次 结构 


5-56 数据 上 载 过 程 监控 


第 6 步 : 单 击 “ 层 次 结构 ”按钮 ， 进 入 层次 结构 显示 界面 可 以 看 到 ， 已 经 成 功 上 载 了 
来 自 源 BW 系统 的 层次 结构 ， 如 图 5-57 所 示 。 


198 


4 


т 


T 


= 
| 层次 结构 (1) 编辑 (E) 转 到 (6) 系统 (Y) 帮助 (H) 
з чотезе Ви лз 
Бка аА" 显示 : “活动 版 本 ' 
% | вв [арав | 层次 结构 属性 |а ав 18] 


8 Æ 
[-] [SE £ S; 特性 节点 间隔 Ed E-3 bs. 


Ў 


РИ 1772180 ЕСЕ ЕСЕ 
Z EA C GOGSDM 00017”. 
v À Aa GOGSDM 1000 |. 
Æ 中 国 公司 GOGSDM 1001 [^ 
Æ EAS GOGSDM 1002 | 
Ё? 韩国 公司 GOGSDM 1003 | 
АЕ 欧洲 公司 G0GSDM 2000 Г 
Д? БЕЛЕ) GOGSDM 2001 [^ 
Æ АҒАН GOGSDM 2002 | 
АЕ Аа) GOGSDM 2003 | 
AP 英国 公司 GOGSDM 2004 C 


5-57 上载 成 功 的 层次 结构 


在 数据 的 上 载 过 程 中 ， 我 们 总 是 面临 着 层次 结构 处 理 的 各 种 困扰 。 虽 然 ERP 提供 了 
足够 多 的 层次 结构 数据 源 ， 且 这 些 数据 源 也 能 在 大 部 分 情况 下 满足 我 们 对 于 层次 结构 的 
需要 。 但 是 在 很 多 情况 下 ， 我 们 需要 手工 维护 层次 结构 ， 这 就 带 来 了 一 个 问题 ， 即 在 开 
发 环境 维护 好 的 层次 结构 中 ， 由 于 系统 没有 提供 层次 结构 的 传输 功能 ， 因 此 需要 在 生产 
环境 中 再 次 进行 手工 维护 ， 或 在 生产 系统 中 维护 好 的 层次 结构 又 无 法 自动 同步 到 开发 系 
统 中 ， 供 查询 的 设计 使 用 。 在 这 些 情况 下 ， 先 将 层次 结构 打包 下 载 为 文本 文件 ， 然 后 再 
利用 IDOC 的 方式 将 文本 文件 传输 到 目标 系统 ， 计 系统 自动 生成 层次 结构 ， 这 是 一 个 有 效 
的 解决 方案 。 


5.4.2 从 数据 表 生 成 层次 结构 


l. 应 用 场景 描述 

在 某 些 项 目 中 ， 我 们 可 能 抽取 来 自 于 不 同系 统 的 数据 ， 这 些 数 据 既 有 主 数据 ， 也 有 交易 
数据 ， 当 然 也 可 能 有 层次 结构 。 让 项 目 组 成 员 感到 为 难 的 是 ， 非 SAP 系统 不 会 考虑 到 BW 
的 需要 而 新 建 类 似 于 ERP 成 本 中 心 层 次 结构 那样 的 数据 源 ， 但 是 用 户 又 希望 在 BW 系统 自 
动 构建 这 些 层次 结构 ， 而 不 是 手工 处 理 上 万 条 的 记录 ， 用 户 希 望 能 够 在 系统 获取 了 节点 之 间 
关系 的 信息 后 ， 由 BW 系统 自动 产生 相同 的 层次 结构 。 

2. 根据 节点 关系 表 产 生 层次 机 构 

本 处 以 简单 的 公司 代码 的 层次 结构 数据 表 为 例 ， 详 细 说 明 如 何 使 用 ABAP 代码 的 方式 创 
建 对 象 的 层次 结构 ， 具 体 步 又 如 下 。 

第 1 步 : 我 们 必须 有 相应 的 层次 结构 数据 表 ， 在 这 些 数据 表 中 定义 了 公司 代码 、 公 司 
代码 的 父亲 节点 ， 以 及 对 应 公司 代码 自身 的 中 文 描 述 ， 这 里 暂且 不 考虑 子 节点 之 间 的 顺 
序 问 题 。 假 如 有 如 图 5-58 所 示 的 数据 表 ， 很 显然 ,我 们 要 构建 的 层次 结构 和 之 前 的 示例 
类 似 。 

第 2 步 : 新 建 DSO 存储 这 些 记录 ， 加 入 DSO, 技术 名 称 叫 作 ZHIERDSO， 则 其 定义 如 
图 5-59 所 示 。 
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公司 代码 | 上 级 公司 代码 描述 


= 6 演示 层次 结构 D50 ZHIERDSO 
7 Зуева 
国 版 本 © 正在 处 理 
Е 保存 © 已 保存 
B 修订 版 本 三 | 活动 版 本 
B не G 活动 ， 可 执行 
5 gam 
vo xerzas 
A Ae G0GSDM CHAR 08 G0GSDM 
v Eks 数据 字段 
Æ 上 级 公司 代码 G0SGSDM CHAR 08 G0GSDM 
Ааа OTXTSH CHAR 20 0TXTSH 
> 口 导航 属性 
> 口 索 引 


图 5-59 DSO 的 结构 定义 


相关 模型 创建 完毕 ， 并 向 DSO 填充 数据 后 ， 表 /BIC/AZHIERDSO00 的 数据 内 容 如 
图 5-60 所 示 。 


数据 浏览 器 : 表格 /BIC/AZHIERDSO00 选择 条 目 10 


Xo: /BIC/AZHIERDSO00 
被 显示 的 字段 : 4 的 ”4 国定 栏目 ; 1 列表 宽度 0250 


公 
洲 
国 
本 
洲 
国 
太 利 公司 
国 

国 


总 公司 
亚洲 公司 
中 国 公司 
日 本 公司 
韩国 公司 
欧洲 公司 
法 国 公司 
意大利 公 
德国 公司 
英国 公司 


Р 5-60 Ж/ВІС/А7НШЕВр5000 的 数据 内 容 


第 3 J, 创建 可 执行 程序 ， 读 取 表 /BICZAZHIERDSO00 中 的 内 容 ， 并 且 根 据 先后 顺序 建 
立 层次 结构 ， 建 立 好 的 层次 结构 如 图 5-61 和 图 5-62 所 示 。 
初始 的 屏幕 层次 结构 维护 


含 层次 结构 的 划 本 特征 GOGSDI D MoO 


m G0GSDM 
公司 代码 层次 《自动 生成 ?| GOGSDM_HIER_GENERATGOGSDM А - 9999.12.31 


图 5-61 公司 代码 的 层次 结构 概览 
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层次 结构 "公司 代码 层次 《自动 生成 ) ' 显示 : ' 活 动 版 本 


层次 结构 "Аа ӨБК (ADER) ' 显示 : “活动 版 本 ' 


ajoja] | рер | 层次 结构 属性 | 8348 2|2 EIL AP TES] 
[eu cose [Cone |Гүжанев” [en [| [s РАД ЧЕ 
EMEI 
了 RAS GOGSDM 0001 [^ 
v Æra GOGSDM 1000 Г] 
PET GOGSDM 1001 [7 
Ё EAS GOGSDM 1002 [7 
Ё ала GOGSDM 1003 [7 
У 万 欧洲 公司 GOGSDM 2000 Г] 
Ё 法 国 公司 GOGSDM 2001 [ 
A RAUS GOGSDM 2002 O 
而 德国 公司 GOGSDM 2003 [7 
A шла) GOGSDM 2004 [7 


Kd 5-62 程序 生成 的 层次 结构 


示例 : 生成 层次 结构 的 程序 代码 如 下 。 


ж бс 


*& Report 7СҺЕАТЕ С60650М HIER 


*& 
ж бс 


*& 
*& 
ж бс 


REPORT 


TABLES: rsdodso, 


rsdiobj. 


zcreate. gOgsdm, hier. 


TYPES; BEGIN OF ys gsdm hier, 


/ bic/g0gsdm 
/ bic/g0sgsdm 
nodeid 
nodename 
tlevel 

parentid 
childid 


nextid 


"公司 代码 
"上 级 公司 代码 


TYPE /bic/oigO0gsdm, 
TYPE /bic/oigOsgsdm, 
TYPE rshienodid , 
TYPE rsnodename , 
TYPE rstlevel , 

TYPE rsparent , 

TYPE rschild, 

ТҮРЕ rsnext , 


END ОҒ ys gsdm hier, 
yt gsdm hier TYPE SORTED TABLE OF ys gsdm hier 
WITH NON - UNIQUE KEY /bic/g0gsdm /bic/g0sgsdm. 


TYPES: BEGIN OF ys gsdm, nodeid, 
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gsdm 
nodeid 


TYPE  /bic/oig0gsdm, 
TYPE rshienodid , 


END OF ys gsdm, nodeid, 
yt. сөйт nodeid TYPE SORTED TABLE OF ys сөйт nodeid WITH UNIQUE KEY gsdm. 


DATA: g iobjnm 
DATA: gt өзіт hier 


DATA: gs hiehead 
ls hiedirt 
gt hiedirt 


gt hierstruc 
ls hiernode 


gt thiernode 


ls nodename 


TYPE  char30. 


TYPE yt gsdm hier, "存放 ЖЕМІ 
gt gsdm, nodeid TYPE уі gsdm nodeid. "存放 各 个 节点 的 ID 号 


ТҮРЕ rsndi_s_hierupdate , 
TYPE rshiedirt , 
TYPE STANDARD TABLE OF rshiedirt, 


TYPE STANDARD TABLE OF rshierstruc , 
TYPE rsthiernode , 


TYPE STANDARD TABLE OF rsthiernode , 


TYPE rsndi, s. nodenm, 


"层次 名 
"层次 结构 文本 
"层次 结构 文本 


"层次 结构 节点 的 接口 结构 
"文本 节点 的 文本 
"文本 节点 的 文本 


I 
p 


"节点 名 称 和 范 目 


gt nodenames ТҮРЕ STANDARD TABLE OF rsndi_s_nodenm, 


gl messages 


TYPE STANDARD TABLE OF rsndi. s. messa 


LOG WRITE MESSAGES 接口 


РАТА: 1 subrc LIKE 


sy — subre . 


DATA: gc. hieid TYPE rshieid. "层次 结构 技术 名 称 


START - OF - SELECTION. 


g iobjnm = GOGSDM . "生成 层次 的 特性 名 称 


CONCATENATE g 


iobjn | HIER, GENERATE INTO gc hieid. 


" GOGSDM, HIER. GENERATE 


gs hiehead — hienm 


gs hiehead — iobjnm 


ls. hiedirt - langu 
ls. hiedirt ~ hieid 
ls. hiedirt — objvers 
ls. hiedirt — txtsh 


ls. hiedirt — txtmd 


= gc hieid. 


-g iobjnm. 


21. 

= gc, hieid. 

LA. 

= 公司 代码 层次 (自动 生成 ) . 
公司 代码 层次 (自动 生成 ) . 


ge. "应 用 程序 日 志 : APPL_ 
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ls. hiedirt — txtlg + 公司 代码 层次 (自动 生成 ). 
INSERT ls_hiedirt INTO TABLE gt. hiedirt. 


PERFORM construct, hierstruc. . 


CALL FUNCTION RSNDI SHIE STRUCTURE UPDATE 


EXPORTING 
i s hiehead -gs hiehead 
* І SUBTREES Е 
IMPORTING 
e subrc -] subrc 
TABLES 
i t hiedirt = рі hiedirt 
i t hierstruc = рі hierstruc 
i t thiernode = gt thiernode 
i t. nodenames = gt nodenames 
* І T HIERINTVL = 
e Lt messages = gl messages 


DATA: ls hiesel TYPE  rsndi s hiesel. 


ls hiesel -objvers = А. 


ls hiesel - hienm = gc, hieid. 
ls hiesel — dateto = 99991231. 
ls hiesel -iobjm -о iobjnm. 
CALL FUNCTION RSNDI SHIE ACTIVATE 
EXPORTING 
* i hieid -]s ісі hiedir — hieid 
i s hiesel —]s hiesel 
l] reorg z 
IMPORTING 
* e noticed to activate = lt noticed. to active 
e subrc = ]_subrc 
TABLES 
e_t_messages = gl. messages. 
ж $ ж 
*& Form construct, hierstruc 
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ж text 


Ө * 
* --» CT HIERSTRUC text 
* * 


FORM construct, hierstruc . 


DATA: ls hierstrue TYPE rshierstruc , 
ls gsdm hier TYPE ys gsdm hier, 
ls. gsdm, nodeid ТҮРЕ ув gsdm, nodeid, 
]. nodeid TYPE rshienodid , 
1. nodeid, counter TYPE rshienodid , 
1 top. nodeid TYPE rshienodid , 
] top level ТҮРЕ rstlevel, 
] parentid TYPE rsparent. 


FIELD - SYMBOLS: «fs gsdm hier» ТҮРЕ ys, gsdm, hier. 

BREAK ~ POINT. 

SELECT ж INTO CORRESPONDING FIELDS OF TABLE gt. gsdm hier FROM /bic/azhierdsoO0. 
CHECK gt. gsdm, hier IS NOT INITIAL. 


жеж) 循环 处 理 ,生成 指标 层次 和 NODEID 的 对 应 关系 
ox Xf NODEID 和 PARENTID 赋值 


LOOP AT ої сөйт hier ASSIGNING «fs сөйт hier >. 


READ TABLE gt gsdm nodeid INTO ls gsdm. nodeid 
WITH KEY gsdm = «fs сөйт hier > — /bic/g0gsdm. 
жа жж Жж жж 
* 如 果 最 开始 没有 找到 任何 编码 的 ID 号 , 则 是 从 最 开始 进行 的 第 一 个 编码 ;同时 直接 将 gt_gs- 
dm, nodeid 中 的 指标 指定 为 最 上 层 的 节点 和 第 一 个 ID 号 码 (编号 同时 按照 每 个 加 1 处 理 ) 
b sk sk sk sk sk sk sk sk sk же 
IF sy - subrc МЕ0. "未 找到 
ls gsdm, nodeid — gsdm = < fs gsdm пег > — /bic/g0gsdm. 


] nodeid, counter 21 nodeid, counter + 1. 

ls. gsdm, nodeid – nodeid 21 nodeid, counter . 

INSERT Is. сөйт nodeid INTO TABLE gt. gsdm, nodeid. 
ENDIF. 


ЖЕЖ ЖЖЖ ЖЖЖ 
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ж 如 果 找 到 了 ID 号 , 则 是 已 经 进行 了 编号 的 节点 , 则 ID 7 B SE T Be ЖІМ ID 号 或 上 面 已 经 
编 好 的 ID 号 


LELLLLLLLLLLLLLLLELI 


«Ís gsdm hier »— nodeid — 21s gsdm nodeid - nodeid. 


ж а ж 
* 然后 寻找 上 级 指标 编码 
жоок sk sk sk sk sk sk sk sk sk sk нж 

READ TABLE gt. gsdm, nodeid INTO Is gsdm, nodeid 

WITH KEY gsdm = «fs сөйт hier >- /bic/g0sgsdm. 

ЖЖК к 
* 如 果 上 级 指标 编码 的 ID 号 不 存在 , 则 先 对 上 级 指标 编码 进行 编号 (编号 同时 按照 每 个 加 1 处 
理 ) 
六 六 六 六 六 六 六 六 六 六 六 六 六 六 六 六 六 六 

IF sy - subre NE 0. "未 找到 


ls_gsdm_nodeid — gsdm = < fs gsdm hier > — /bic/gOsgsdm. 


] nodeid, counter -1 nodeid, counter + 1. 
ls. gsdm, nodeid – nodeid = 1. nodeid, counter . 
INSERT ls gsdm nodeid INTO TABLE gt сөйт  nodeid. 
ENDIF. 
Ж ЖЖЖ Ж ЖЖЖ 
* 如 果 找 到 了 上 级 指标 的 ID 号 , 则 是 已 经 进行 了 编号 的 父 节点 , 则 ID 号 直接 等 于 读 出 来 的 父 
节点 ID 号 或 刚才 已 经 编 好 的 ID 号 ,以 此 作为 父 节 点 的 编号 


ЖЖЖ ЖЖ ЖЖЖ ЖЖЖ 


«Ís gsdm, hier > — parentid = ls. gsdm, nodeid — nodeid. 


«fs gsdm hier > – nodename = < fs gsdm hier > — /bic/g0gsdm. 
TRANSLATE «fs gsdm, hier > — nodename TO UPPER CASE. 
ENDLOOP. 


**2) 循环 生成 TLEVEL 和 CHILDID NEXTID ,并 生成 lt_hierstruc 


* (ор node 


1 top. level = 1. 
PERFORM loop. process USING 0001 1 top level 0. "总 是 采用 0001 作为 项 节点 


ls hierstruc - hieid = gc. hieid. 
ls hierstruc – objvers = А. 
ls hierstruc — iobjnm = g iobjnm. 
LOOP AT ої сөйт hier INTO ls gsdm, hier. 
MOVE - CORRESPONDING ls gsdm hier ТО ls hierstruc. 
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INSERT 15 hierstruc INTO TABLE gt. hierstruc. 
ENDLOOP. 


ENDFORM. " construct, hierstruc 


ж бс 


ж бс Form Іоор. process 


ж бс 


ж lext 


* 


* --»L NODEID text 
* --»L LEVEL text 


ж 


FORM loop. process USING i. gsdm 1 level i parentid. 


DATA: ls gsdm hier TYPE ys gsdm, hier, 
ls prev gsdm hier TYPE ys gsdm hier. 
DATA: | level TYPE rstlevel. 
DATA: 1 first node ТҮРЕ charl. 
FIELD -SYMBOLS: «fs gsdm hier» TYPE ув сөйт hier, 
«fs temp > TYPE ys gsdm hier. 


] level = i level. 
жж 首先 读 出 该 节点 
READ TABLE gt_gsdm_hier ASSIGNING < fs_gsdm_hier > 
WITH KEY /bic/g0gsdm = i gsdm. 
* ”设置 对 应 的 Level 
IF sy - subrc EQ 0. 
«Ís gsdm hier >—tlevel -і level. 
«Ís gsdm hier > – parentid = i parentid. 
ENDIF. 


жж ”循环 处 理 该 节点 ,判断 是 否 具备 子 节 点 
] first поде + X. 
] level = 1 level + 1. 
LOOP AT ої gsdm hier INTO ls сөйт hier 
WHERE /bic/g0sgsdm -і gsdm. 


sO 如 果 是 第 一 个 子 节点 , 则 父 节点 设置 子 节点 标识 
IF ] first node- X . 
CLEAR 1. first, node. 
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«Ís gsdm, hier >- childid = ls. gsdm, hier - nodeid. 
ELSE. 
vx @ 如 果 是 第 二 个 以 后 的 子 节点 , 则 设置 上 一 个 节点 的 NEXTID 为 本 节点 
READ TABLE gt_gsdm_hier ASSIGNING <fs_temp > 
WITH KEY /bic/g0gsdm = ls prev. gsdm. hier — /bic/g0gsdm. 
IF sy - subre EQ 0. 
«fs temp >- nextid = ls сөйт hier - nodeid. 
ENDIF. 
ENDIF. 
жж 该 节点 具备 子 节 点 ,继续 循环 处 理 
PERFORM loop. process USING ls_gsdm_hier — /bic/g0gsdm l_level «fs gsdm hier >- nodeid. 


ls prev езіп hier = ls gsdm hier.. "将 本 次 处 理 的 条 目 作 为 下 一 个 处 理 条 目的 前 一 个 条 目 


ENDLOOP. 


ENDFORM. " construct, hierstruc 


通过 使 用 АВАР 程序 的 方式 读 取 需 要 建立 层次 结构 对 象 的 节点 之 间 的 相互 关系 ， 即 可 在 
BW 系统 中 自动 产生 和 原始 系统 一 模 一 样 的 层次 结构 ， 这 就 大 大 减少 了 用 户 手工 维护 的 工作 
量 。 如 果 将 节点 关系 的 相关 数据 自动 地 每 天 同步 到 BW 系统 中 ， 同 时 又 采用 本 单元 所 述 的 层 
次 结构 自动 生成 程序 ， 那 么 即 可 在 两 套 系 统 之 间 自 动 地 同步 层次 结构 ， 这 样 就 避免 了 源 系 统 
不 是 SAP 系统 ， 没 有 标准 的 层次 结构 数据 源 的 缺陷 。 


5.5 BW 3. X 中 的 传输 规则 


5.5.1 传输 规则 中 的 开始 例 程 


l. 应 用 场景 描述 

用 户 的 系统 是 7.X 版 本 ,但 是 该 版 本 的 模型 是 从 3. X 版 本 升级 而 来 ， 因 此 大 多 数 模 型 
尚未 采用 最 新 的 转换 方式 进行 建设 ,还 保留 了 以 前 3. X 的 处 理 方式 ， 即 数据 源 先 通过 传输 
规则 连接 到 信息 源 ， 信 息 源 再 通过 更 新 规则 连接 到 众多 的 数据 目标 对 象 。 

现在 由 于 某 个 数据 源 〈 预 算数 据 ) 上 载 的 数据 不 是 增 量 数据 ， 而 是 每 次 全 部 上 载 ， 但 
是 为 了 提高 系统 性 能 用 户 希 望 在 数据 上 载 之 前 将 历史 数据 进行 删除 ， 即 只 需要 当前 年 度 以 及 
以 后 的 预算 数据 。 

2. 实施 步骤 详解 

在 传输 规则 中 ， 我 们 能 很 快 在 界面 上 找到 新 建 开始 例 程 的 位 置 ， 即 包含 通信 结构 字段 的 
上 方 ， 如 图 5-63 所 示 。 单 击 “ 创 建 开 始 例 程 ” 按 钮 ， 进 入 开始 例 程 的 编辑 界面 ， 以 下 是 系 
统 上 自动 产生 的 代码 段 。 
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jBIC/GO 


公司 代码 


Tupa 日 历年 САҮЕАГ 
物料 物 和 /BIc/60 
inda BESE | /BIC/KO; 
销售 数量 | 计量 的 单位 ишт 
UNIT — eye = оаа __ WHEN | /BIC/KO; 
KOXSJE ЕЕ (|Æ [KOXSTE 货币 CURREN 
OCURRENCY 9% «| АЕ |ocuRRENC' 
m Jn 
[d 5-63. BW 3. X 中 的 传输 规则 界面 
PROGRAM CONVERSION ROUTINF. 
ж Туре pools used by conversion program 
ype p y prog | 第 1 部 分 
ТҮРЕ - POOLS; RS, RSARC, RSARR, SBIWA, RSSM. 
* Declaration of transfer structure( selected fields only) 
TYPES; BEGIN OF TRANSFER, STRUCTURE , 
* Record number to be filled in case of adding row(s) 
* — to enablé error handling 
record TYPE rsarecord , 
* . [nfoObjeet GOGSDM:; CHAR - 000008 
/BIC/GOGSDM(000008) TYPE C, 
* InfoObjeet OCALYEAR: ХОМС - 000004 
CALYEAR(000004) TYPE N, 
*  InfoObject GOWL: CHAR - 000018 第 2 部 分 


/BIC/GOWL(000018) TYPE С, 
* — [nfoObjeet KOXSSL: CHAR - 000017 
/BIC/KOXSSL(000017) TYPE C, 
* — [nfoObject OUNIT: UNIT - 000003 
UNIT(000003) TYPE C, 
* — [nfoObjeet KOXSJE: CHAR – 000017 
/BIC/KOXSJE(000017) TYPE C, 
*  InfoObject OCURRENCY.: CUKY – 000005 
CURRENCY(000005) TYPE C, 
END OF TRANSFER, STRUCTURE . 
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ж Declaration of Datapackage 


TYPES: TAB TRANSTRU type table of TRANSFER. STRUCTURE. 


* Global code used by conversion rules 


*$*$ begin of global — insert your declaration only below this line ж-ж 

ж TABLES; ... 第 3 部 分 
ж DATA: 

*$*$ end of global — insert your declaration only before this line ж-ж 


FORM STARTROUTINE 
USING С S MINFO ТҮРЕ RSSM 5 MINFO 
CHANGING DATAPAK type TAB. TRANSTRU 
С T ERRORLOG TYPE rssm t. errorlog. int 
ABORT LIKE SY ~ SUBRC. "set ABORT < > 0 to cancel datapackage 
*$*$ begin of routine — insert your code only below this line ж-ж 第 4 部 分 
ж DATA: l_s_datapak_line type TRANSFER. STRUCTURE, 


* 1.8 errorlog TYPE rssm, 8. errorlog. int. 


ж abort < > 0 means skip whole data package !!! 
ABORT = 0. 


*$:*$ епа of routine - insert your code only before this line ж-ж 


ENDFORM. 


可 以 看 到 程序 的 结构 构成 如 下 : 

第 1 部 分 是 系统 类 型 声明 ， 不 可 更 改 。 

第 2 部 分 是 传输 结构 中 所 包含 的 字段 ， 注 意 不 是 通信 结构 所 包含 的 字段 ， 因 为 在 进行 特 
性 对 照 规则 之 前 ， 系 统 只 有 传输 结构 的 表 ， 所 以 此 处 不 包含 物料 组 的 信息 。 

第 3 部 分 是 开发 人 员 可 以 声明 的 全 局 变量 ， 此 处 声明 的 变量 不 仅 在 开始 例 程 中 可 以 使 
用 ， 而 且 在 整个 传输 规则 中 都 能 使 用 。 因 此 如 果 需 要 一 个 内 表 ， 则 从 提高 系统 处 理性 能 的 角 
度 出 发 ， 最 好 在 此 处 进行 声明 和 填充 ， 供 后 续 操 作 使 用 。 

第 4 部 分 是 开始 例 程 实际 处 理 的 部 分 ， 该 部 分 包括 USING 参数 G_S_MINFO ， 修 改 内 表 
DATAPAK, G T ERRORLOG 和 ABORT。 最 重要 的 是 内 表 DATAPAK， 里 面包 含 了 传输 结构 
以 及 与 之 对 应 的 数据 记录 。 记 住 ， 开 始 例 程 不 是 只 调用 一 次 ， 而 是 每 个 数据 包 调 用 一 次 ， 
此 代码 的 性 能 优越 尤为 重要 。 

参数 GC_S_MINFO 包含 了 一 般 信息 RSSM_S_INFO、 请 求 号 REQUNO、 数 据 包 号 DATA- 
PAKID 、 数 据 源 名 称 SOURCE 、 源 系统 LOGSYS 以 及 其 他 一 些 不 经 常 使 用 的 字段 ， 具 体 参 见 
结构 RSMINFOHEAD, 

参数 ABORT 也 至 关 重 要 ， 如 果 需 要 跳 过 整个 数据 包 不 处 理 ， 则 可 以 给 参数 ABORT 赋 
值 “ 非 0” 即 可 。 传输 规 则 中 的 开始 例 程 代码 如 下 。 
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PROGRAM CONVERSION. ROUTINF. 


ж Туре pools used by conversion program 


TYPE - POOLS; RS, RSARC, RSARR, SBIWA, RSSM. 


* Declaration of transfer structure( selected fields only) 


TYPES; BEGIN OF TRANSFER, STRUCTURE , 


* 


* 


Record number to be filled in case of adding row( s) 
to enablé error handling 

record TYPE rsarecord , 

InfoObjeet GOGSDM : CHAR – 000008 
/BIC/GOGSDM(000008) TYPE C, 
InfoObject OCALYEAR : NUMC - 000004 
CALYEAR(000004) TYPE N, 

InfoObject GOWL: CHAR – 000018 
/BIC/GOWL(000018) TYPE C, 
InfoObject KOXSSL: CHAR - 000017 
/BIC/KOXSSL(000017) TYPE С, 
InfoObject OUNIT: UNIT — 000003 
UNIT(000003) TYPE C, 

InfoObject KOXSJE: CHAR - 000017 
/BIC/KOXSJE(000017) TYPE C, 
InfoObject OCURRENCY : CUKY - 000005 
CURRENCY(000005) TYPE C, 


END OF TRANSFER, STRUCTURE . 


* Declaration of Datapackage 


TYPES: TAB TRANSTRU type table of TRANSFER, STRUCTURE. 


* Global code used by conversion rules 


*$*$ begin of global — insert your declaration only below this line 
ж TABLES: ... 
DATA: 1 s datapak line TYPE transfer. structure , 


DATA:1 t data TYPE TABLE OF transfer. structure WITH HEADER LINE. 


ls errorlog TYPE төзіп s. errorlog. int. 


DATA:l year(4) TYPE n. 
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ж DATA: 


*$*$ end of global — insert your declaration only before this line ж-ж 


FORM STARTROUTINE 
USING С S MINFO TYPE RSSM 5 MINFO 
CHANGING DATAPAK type TAB. TRANSTRU 
С T ERRORLOG ТҮРЕ rssm t. errorlog. int 
ABORT LIKE SY ~ SUBRC. "set ABORT < > 0 to cancel datapackage 
*$*$ begin of routine — insert your code only below this line ж-ж 
CLEAR 1 year. 
] year = sy - datum(4). 
* 只 保留 当前 年 度 以 及 以 后 的 数据 记录 
LOOP AT datapak INTO 1 s даіарак line. 


IF 1 s datapak line — calyear >-| year. 
MOVE - CORRESPONDING 1 s datapak line TO 1 t data. 


APPEND 1 t. data. 
CLEAR 1. t. data. 


ENDIF. 
ENDLOOP. 


REFRESH datapak. 
datapak| | -11 data[ |. 
ж abort < > 0 means skip whole data package !!! 
ABORT = 0. 
*$*$ end of routine — insert your code only before this line ж-ж 


ENDFORM. 


TE BW 3. XP, 系统 并 没有 提供 “转换 ”以 对 数据 进行 清洗 和 转换 ， 而 是 在 数据 源 和 
言 息 源 之 间 提 供 了 “传输 规则 ”。 通 过 在 传输 规则 中 实施 开始 例 程 ， 能 够 在 数据 开始 处 理 之 
前 ， 对 数据 进行 批量 删除 或 其 他 操作 处 理 ， 从 而 最 大 限度 地 节约 系统 资源 。 在 传输 规则 中 实 
施 开 始 例 程 和 在 转换 中 实施 开始 例 程 ， 本 质 上 并 没有 太 多 区 别 ， 只 是 在 语法 上 稍 有 不 同 
而 已 。 


5.5.2 传输 规则 中 的 对 象 例 程 


1. 应 用 场景 描述 

用 户 的 系统 是 7.X 版 本 ， 但 是 该 版 本 的 模型 是 从 3.X 版 本 升级 而 来 ， 因 此 大 多 数 模型 
尚未 采用 最 新 的 转换 方式 进行 建设 ， 还 保留 了 以 前 3.X 的 处 理 方式 ， 即 数据 源 先 通过 传输 
规则 连接 到 信息 源 ， 信 息 源 再 通过 更 新 规则 连接 到 众多 的 数据 目标 对 象 。 
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现在 由 于 某 个 数据 源 (预算 数据 ) 上 载 的 数据 只 包含 物料 信息 ， 没 有 物料 组 的 信息 ， 
用 户 和 希望 系统 能 够 自动 根据 交易 数据 中 的 物料 编码 推导 出 物料 组 ， 具 体 的 规则 是 获得 物料 编 
码 的 前 6 位 作为 物料 组 ， 以 备 后 续 分 析 需 求 的 需要 。 

2. 实施 步骤 详解 

ТЕ BW 3. X 的 传输 规则 中 ， 系 统 不 对 特性 和 关键 指标 进行 区 分 ， 它 们 使 用 相同 的 数据 获 
取 规 则 ， 如 图 5-64 所 示 。 


КЖЕ ДА 


公司 代码 | 
OCALYEAR 日 历年 CALYEA 


公司 代码 
ama 


me OWL 物料 Івіс/са 
она ех 0XSSL вә аска 
HENE i OUNIT 计时 的 单位 。 UNIT 

计量 的 单位 OXSJE 请 售 金 额 /BIC/KO; 


EL OCURRENCY їй CURREN 


货币 


(413; 


ІП) шапа 


| 
| 
| 
| 
t 


15-64 BW 3. X 中 的 传输 规则 界面 


要 想 对 对 象 进行 例 程 的 增强 ， 需 要 按照 以 下 步骤 进行 。 

第 1 步 : 在 需要 增强 的 通信 结构 字段 ， 这 里 由 于 “物料 组 ”需要 从 “物料 ”进行 派生 ， 
因此 单 击 “物料 组 ”后 面 对 应 的 “传输 规则 ”按钮 ， 系 统 弹 出 “编辑 传输 规则 ”对 话 框 ， 
指定 对 象 的 规则 明细 ， 如 图 5-65 所 示 。 


[cr REER _ 回 
信息 源 SINOISO4 1 
通讯 结构 的 信息 对 象 GOWLZ 


源 系统 PC_FILE 


传输 规则 
@ A) 信息 对 象 
OO же 


ОТЕ pie Ü 
O96 Ask E 
转换 库 


回 


ЕДЕ 


5-65 指定 对 象 的 规则 明细 


第 2 步 : 在 “传输 规则 ”中 选中 “ 例 程 ” 单 选 按钮 ， 并 单 击 其 后 的 创建 图 标 回 ， 如 
В 5-66 所 示 。 
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[E IRSE 7 
信息 源 


SINOISO4 


通讯 结构 的 信息 对 象 


GOWLZ 


源 系 统 


PC_FILE 


传输 规则 
OZ ERIS 
OG xg 
©! pig 
O96 公式 


DID 


[i] 转换 库 


viis] 


图 5-66 选择 “ 例 程 ”作为 规则 


第 3 步 系统 进入 源 字段 选择 界面 ， 输 入 例 程 的 文本 描述 “根据 物料 推导 物料 组 ”， 并 
选择 需要 作为 派生 条 件 的 字段 ， 此 处 选择 /BIC/COWL 作为 物料 组 的 派生 条 件 ， 如 图 5-67 


所 示 。 


区 信息 对 象 GOWL 的 创建 传输 例 程 


根据 物料 推导 物料 组 | 


传输 例 程 


传输 结构 字段 的 使 用 
口 无 字段 


口 所 有 字段 


公司 代码 
日 历年 


K0XSSL 
OUNIT 
KOXSJE 


5-67 选择 来 源 字段 


传输 规则 中 的 对 象 例 程 ， 系 统 自动 产生 的 代码 如 下 。 


PROGRAM CONVERSION. ROUTINF. 


ж Туре pools used by conversion program 
TYPE - POOLS: RS, RSARC, RSARR, SBIWA, RSSM. 


| 第 2 部 分 
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ж Declaration of transfer structure( selected fields only) 


TYPES; BEGIN OF TRANSFER, STRUCTURE , 


ж 


ж 


ж 


ж 


ж 


InfoObject GOGSDM ; CHAR - 000008 
/BIC/GOGSDM(000008) TYPE C, 
InfoObject OCALYEAR; NUMC - 000004 
CALYEAR(000004) TYPE N, 
InfoObject GOWL: CHAR - 000018 
/BIC/GOWL(000018) TYPE C, 
InfoObject KOXSSL: CHAR - 000017 
/BIC/KOXSSL(000017) TYPE C, 
InfoObject OUNIT; UNIT — 000003 
UNIT(000003) TYPE C, 

InfoObject KOXSJE; CHAR - 000017 
/BIC/KOXSJE(000017) TYPE C, 
InfoObject OCURRENCY ; CUKY ~ 000005 
CURRENCY (000005) ТҮРЕ C, 


END OF TRANSFER, STRUCTURE . 


* 


Global code used by conversion rules 


第 2 部 分 


*$*$ begin of global — insert your declaration only below this line 


ж TABLES: ... 


DATA: l s datapak line TYPE transfer. structure , 


DATA:1 t data TYPE TABLE OF transfer. structure WITH HEADER LINE. 


ls errorlog TYPE rssm s errorlog. int. 


DATA:l year(4) TYPE n. 


* 


DATA: 


*$*$ end of global — insert your declaration only before this line 


ж 


ж 


ж 


第 3 部 分 


FORM COMPUTE /BIC/GOWLZ 


第 4 部 分 


Compute value of InfoObject GOWLZ 


in communication structure / BIC/CSSINOIS04 


Technical properties : 
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ж field name -/BIC/GOWLZ 


* data element z/BIC/OIGOWLZ 
* data type - CHAR 

* length - 000006 

ж decimals = 000000 

ж АВАР type -С 

ж АВАР length - 000012 

ж reference field - 


* Parameters: 

ж --> RECORD NO Record number 

ж --> TRAN STRUCTURE Transfer structure 

* <-- RESULT Return value of InfoObject 

* <-> С.Т ERRORLOG Error log 

ж <--  RETURNCODE Return code(to skip one record) 

ж <-- ABORT Abort code( to skip whole data package) 


ж 


FORM COMPUTE /BIC/GOWLZ 
USING RECORD. NO LIKE SY - ТАВІХ 
TRAN STRUCTURE TYPE TRANSFER. STRUCTURE 
С. S MINFO TYPE RSSM 5 MINFO 
CHANGINGRESULT TYPE /BIC/OIGOWLZ 
С Т ERRORLOG TYPE rssm t. errorlog int 
RETURNCODE LIKE SY – SUBRC 
ABORT LIKE SY - SUBRC. "set ABORT < > 0 to cancel datapackage 
*$*$ begin of routine — insert your code only below this line 


ж DATA: l s errorlog TYPE rssm s errorlog int. 


RESULT = . 
* returncode < > 0 means skip this record 
RETURNCODE - 0. 
* abort « » 0 means skip whole data package !!! 
ABORT =0. 
*$*$ end of routine — insert your code only before this line 
ENDFORM. 


ж 


* FORM INVERT /BIC/GOWLZ 第 5 部 分 


ж 


ж Inversion of selection criteria for InfoObject GOWLZ 
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ж This subroutine needs to be implemented only for SAP RemoteCubes 


* (for better performance) and for the Report/Report Interface 
* ( drill through). 
* 
* * 
* --> I RT CHAVL CS Ranges table for current InfoObject 
ж --> I THX SELECTION CS Selection criteria for all other InfoObjects 
* <-- QC T SELECTION Selection criteria for fields of 
* transfer structure 
* <-- Е EXACT Flag: Inversion was exact 
* * 
FORM INVERT /BIC/GOWLZ 
USING I RT CHAVL CS TYPE RSARC RT CHAVL 
I THX SELECTION CS TYPE RSARC THX SELCS 
CHANGINGC T SELECTION TYPE SBIWA T SELECT 
E EXACT TYPE RS BOOL. 
*$*$ begin of inverse routine — insert your code only below this line ж-ж 
DATA: 


L 5 SELECTION LIKE LINE OF C T SELECTION. 


* An empty selection means all values 


CLEAR C T SELECTION. 


L S SELECTION - FIELDNM = /BIC/CGOWL . 


* Selection of all values may be not exact 


E EXACT = RS. C. FALSE. 


*$*$ end of inverse routine - insert your code only before this line ж-ж 


ENDFORM. 


可 以 看 到 程序 的 结构 构成 如 下 s 

第 1 部 分 是 系统 类 型 声明 ， 不 可 更 改 。 

第 2 部 分 是 传输 结构 包含 的 字段 定义 ， 虽 然 系统 写 了 “selected fields only”， 但 是 实际 
上 此 处 还 是 包含 了 所 有 对 象 ， 但 是 不 能 使 用 。 

第 3 部 分 是 开发 人 员 可 以 声明 的 本 地 变量 ， 在 这 里 可 以 看 到 之 前 在 开始 例 程 中 声明 的 全 
局 变量 定义 。 

第 4 部 分 是 实际 的 计算 过 程 ， 代 码 也 在 此 处 定义 。 


3i 
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第 5 部 分 是 附加 代码 (INVERT /BIC/GOWLZ) , ЯЯ efi Hl ШАҢ Bu Be SY ETT JR S Dk 
转 需 要 传输 选择 条 件 时 才 需 要 使 用 该 段 程序 。 
传输 规则 中 的 对 象 例 程 代码 如 下 。 


PROGRAM CONVERSION. ROUTINF. 


* Type pools used by conversion program 


TYPE - POOLS; RS, RSARC, RSARR, SBIWA, RSSM. 


* Declaration of transfer structure( selected fields only) 
TYPES: BEGIN OF TRANSFER. STRUCTURE , 
* . [nfoObjeet GOGSDM; CHAR - 000008 

* — /BIC/GOGSDM(000008) TYPE С, 

* — [nfoObjecet OCALYEAR: NUMC – 000004 

* CALYEAR(000004) ТҮРЕ N, 

* . [nfoObjeet GOWL: CHAR - 000018 

/BIC/GOWL(000018) TYPE С, 

* . [nfoObjeet К0Х551,; CHAR - 000017 

* — /BIC/KOXSSL(000017) TYPE С, 

* — [nfoObject OUNIT: UNIT – 000003 

* — UNIT(000003) TYPE С, 

* — [nfoObjeet KOXSJE: CHAR - 000017 

* — /BIC/KOXSJE(000017) TYPE C, 

*  InfoObject OCURRENCY.: CUKY – 000005 
* CURRENCY (000005) TYPE C, 

END OF TRANSFER, STRUCTURE . 


* Global code used by conversion rules 

*$*$ begin of global — insert your declaration only below this line ж-ж 
ж TABLES; ... 

DATA: 1 s datapak line TYPE transfer. structure , 


ls errorlog TYPE rssm s errorlog. int. 
РАТА ;1 t data TYPE TABLE OF transfer. structure WITH HEADER LINE. 
DATA:l year(4) TYPE n. 


* DATA: 


*$*$ end of global — insert your declaration only before this line ж-ж 
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ж FORM COMPUTE /BIC/GOWLZ 


* Compute value of InfoObject GOWLZ 
* in communication structure /BIC/CSSINOISOA 


ж Technical properties : 


* field name z/BIC/GOWLZ 

* data element z/BIC/OIGOWLZ 
* data type - CHAR 

* length = 000006 

* decimals - 000000 

ж АВАР type -С 

ж АВАР length = 000012 

ж reference field E 


* Parameters: 


ж --> RECORD NO Record number 
ж --> TRAN STRUCTURE Transfer structure 
ж <-- RESULT Return value of InfoObject 
* <=> С.Т ERRORLOG Error log 
* <--  RETURNCODE Return code( to skip one гесоға) 
ж <-- ABORT Abort code( to skip whole data package) 
* 
FORM COMPUTE /BIC/GOWLZ 
USING RECORD. NO LIKE SY – ТАВІХ 


TRAN STRUCTURE TYPE TRANSFER. STRUCTURE 
С S MINFO TYPE RSSM 5 MINFO 
CHANGING RESULT TYPE /BIC/OICOWLZ 
С T ERRORLOG TYPE rssm t. errorlog. int 
RETURNCODE LIKE SY - SUBRC 
ABORT LIKE SY ~ SUBRC. "set ABORT < > 0 to cancel datapackage 
*$*$ begin of routine — insert your code only below this line 


ж DATA: l s errorlog TYPE rssm s errorlog int. 


RESULT = TRAN. STRUCTURE - /bic/g0wl(6). 
ж returncode < > 0 means skip this record 
RETURNCODE = 0. 


* abort « » 0 means skip whole data package !!! 
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ABORT =0. 


*$*$ end of routine — insert your code only before this line ж-ж 
ENDFORM. 
ж ж 
ж FORM INVERT /BIC/COWLZ 
* * 
* Inversion of selection criteria for InfoObject GOWLZ 
* 
* This subroutine needs to be implemented only for SAP RemoteCubes 
* (for better performance) and for the Report/Report Interface 
* ( drill through). 
* 
* * 
ж --> I RT CHAVL CS Ranges table for current InfoObject 
ж --> ] THX SELECTION CS Selection criteria for all other InfoObjects 
* <-- QC T SELECTION Selection criteria for fields of 
* transfer structure 
* <-- Е EXACT Flag: Inversion was exact 
* * 
FORM INVERT /BIC/GOWLZ 

USING I RT CHAVL CS TYPE RSARC RT CHAVL 

I THX SELECTION CS TYPE RSARC THX SELCS 
CHANGING С.Т SELECTION TYPE SBIWA T SELECT 
E EXACT TYPE RS BOOL. 

*$*$ begin of inverse routine — insert your code only below this line ж-ж 

DATA: 

L S SELECTION LIKE LINE OF C T SELECTION. 

* An empty selection means all values 

CLEAR C T SELECTION. 

L S SELECTION - FIELDNM = /BIC/GOWL . 
* 
* Selection of all values may be not exact 

E EXACT = R$ C FALSE. 
*$*$ end of inverse routine - insert your code only before this line ж-ж 


ENDFORM. 
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5.6 BW 3. X 中 的 更 新 规则 


在 更 新 规则 中 ， 我 们 更 多 的 是 从 最 终 用 户 使 用 报表 的 角度 来 考虑 是 否 需要 增加 相关 的 规 
则 ， 如 是 否 需要 在 开始 例 程 中 增加 代码 以 降低 数据 量 并 达到 提升 性 能 的 要 求 ， 又 或 者 我 们 希 
望 将 能 够 进行 的 计算 过 程 在 更 新 规则 中 完成 ， 然 后 将 结果 存储 到 信息 提供 者 中 ， 如 信息 块 。 


5.6.1 应 用 场景 描述 

假设 ， 同 一 个 销售 开票 信息 源 会 更 新 到 多 个 目标 ， 且 在 数据 源 到 信息 源 的 过 程 中 ,用 户 
并 没有 进行 任何 的 转换 ， 只 保留 了 最 原始 的 信息 ， 但 是 原始 信息 中 的 物料 组 由 于 历史 原因 和 
现在 的 物料 不 能 匹配 上 。 用 户 希 望 在 更 新 到 数据 目标 的 过 程 中 ， 系 统 能 根据 物料 自动 推导 出 
物料 组 ， 逻 辑 是 物料 的 前 6 位 。 同 时 ， 用 户 还 希望 计算 出 每 条 数据 的 销售 价格 ， 将 以 外 币 计 
算 的 金额 折算 为 本 位 币 。 

而 对 于 库存 模型 ， 用 户 希 望 系统 能 够 自动 根据 库存 模型 中 收 到 物料 的 记录 ， 计 算 当前 库 
存 的 库 龄 。 


5.6.2 实施 步骤 详解 


1. 更 新 规则 中 的 开始 例 程 
与 传输 规则 中 的 开始 例 程 类 似 ， 在 更 新 规则 中 ， 也 可 以 定义 开始 例 程 ， 对 数据 进行 预 处 
理 。“ 创 建 开 始 例 程 ” 按 钮 位 于 规则 明细 的 正 上 方 ， 如 图 5-68 所 示 。 


更 新 规则 更 改 : 规则 
| ЕЕ ЧО | 


信息 块 SINOCO4 SINO 信息 块 04 

信息 源 SINOISO4 SINO 第 四 个 信息 源 

版 本 о жан nigris 

HSE D жа» німі 

最 后 更 改作 PAHXIE 2012. 07.18|17:40:02| 

负责 人 PAHXIE 

D авая ті 


更 新 规则 


о din LINCHIT 7c 77 


5-68 “创建 开始 例 程 ”按钮 


单 击 “ 创 建 开始 例 程 ”按钮 ， 系 统 将 自动 产生 如 下 代码 段 。 


* 更 新 规则 开始 例 程 系统 生成 的 标准 代码 
PROGRAM UPDATE ROUTINE. 
*$*$ begin of global — insert your declaration only below this line ж-ж 


ж TABLES: ... 


第 1 部 分 


kama 
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ж DATA: 


*$*$ end of global - insert your declaration only before this line 


* The follow definition is new in the BW3. x 

TYPES: 

BEGIN OF DATA. PACKAGE STRUCTURE. 
INCLUDE STRUCTURE /BIC/CSSINOISO4. 

TYPES: 
RECNO LIKE sy - tabix, 

END OF БАТА PACKAGE STRUCTURE. 

DATA: 


FORM startup 


ж 


DATA PACKAGE ТҮРЕ STANDARD TABLE OF DATA PACKAGE STRUCTURE 


WITH HEADER LINE 
WITH NON - UNIQUE DEFAULT KEY INITIAL SIZE 0. 


TABLES 


USING 


MONITOR STRUCTURE RSMONITOR " user defined monitoring 
MONITOR. RECNO STRUCTURE RSMONITORS " monitoring with 
record n 

DATA PACKAGE STRUCTURE БАТА PACKAGE 

RECORD ALL LIKE SY - TABIX 

SOURCE SYSTEM LIKE RSUPDSIMULH - LOGSYS 


CHANGING ABORT LIKE SY - SUBRC. "set ABORT < > 0 to cancel update 


*$*$ begin of routine — insert your code only below this line 


* fill the internal tables " MONITOR" and/or " MONITOR, RECNO" , 


* to make monitor entries 


* if abort is not equal zero, the update process will be canceled 


ABORT = 0. 


*$*$ end of routine — insert your code only before this line 


ж 


ENDFORM. 


LI 
ж-ж 


第 2 部 分 


第 3 部 分 


可 以 看 到 程序 的 结构 构成 如 下 : 


第 1 部 分 是 全 局 变量 声明 ， 此 处 声明 的 全 局 变量 在 更 新 规则 的 所 有 地 方 都 可 见 。 
第 2 部 分 是 数据 包 结 构 的 定义 ，DATA_PACKAGE_STRUCTURE 包含 了 通信 结构 的 所 有 


字段 ， 加 上 一 个 RECNO 字段 。RECNO 字段 对 应 数据 源 PSA 数据 包 中 的 记录 编号 ， 因 此 在 
开始 例 程 中 可 以 不 使 用 SY - TABIX。 


第 3 部 分 也 是 程序 的 主题 部 分 ， 系 统 的 默认 名 称 是 STARTUP。 主 体 部 分 同样 包含 一 个 


ABORT 参数 ， 与 之 前 传输 规则 中 的 ABORT 参数 不 一 样 的 是 ， 如 果 给 ABORT 赋值 “ 非 0”， 
则 整个 上 载 过 程 将 会 被 停止 。 
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示例 : 更 新 规则 中 的 开始 例 程 代码 如 下 。 


PROGRAM update, routine. 


*$:*$ begin of global — insert your declaration only below this line ж-ж 
ж TABLES: ... 

* DATA: 

*$:*$ end of global — insert your declaration only before this line ж-ж 


ж The follow definition is new іп the BW3. x 
TYPES: 
BEGIN OF data, package. structure. 
INCLUDE STRUCTURE / bic/cssinois04. 
TYPES: 
recno LIKE sy – tabix, 
END OF data, package structure. 
DATA: 
data package TYPE STANDARD TABLE OF data, package. structure 
WITH HEADER LINE 
WITH NON - UNIQUE DEFAULT KEY INITIAL SIZE 0. 


ж бс ж 
ж бс Form startup 

* & * 
ж text 

* * 
* --> MONITOR text 

* --» MONITOR RECNO text 

* --» DATA. PACKAGE text 

* --» RECORD. ALL text 

* --»SOURCE SYSTEM text 

* --» ABORT text 

* * 


FORM startup 
TABLES monitor STRUCTURE rsmonitor " user defined monitoring 
monitor recno STRUCTURE rsmonitors " monitoring with record n 
data, package STRUCTURE data, package 
USING record, all LIKE sy – tabix 
source system LIKE rsupdsimulh - logsys 
CHANGING abort LIKE sy — subrc. "set ABORT < > 0 to cancel update 


ж 


*$*$ begin of routine - insert your code only below this line 六 一 六 
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ж fill the internal tables " MONITOR" and/or " MONITOR, RECNO" , 
* to make monitor entries 
FIELD -SYMBOLS: «dp wa» LIKE LINE OF data, package. 
DATA: 1 data package TYPE STANDARD TABLE OF data, package. structure 
WITH NON - UNIQUE DEFAULT KEY INITIAL SIZE 0. 


LOOP AT data, package ASSIGNING «dp. wa». 
* 删除 物料 组 中 的 内 容 
CLEAR: «dp. wa >—/bic/gOwlz. 
* 将 数据 记录 插入 表 L_DATA_PACKAGE 中 
COLLECT «dp. wa» INTO 1 data, package. 
ENDLOOP. 
«ДЕЛІ, DATA. PACKAGE[ ] 代 替 系 统 data. package[. ] 的 内 容 
data, package[ | 21. data, package[| |. 
* 清空 临时 表 data package 
REFRESH 1 data, package. 


* if abort is not equal zero, the update process will be canceled 


abort = 0. 
*$*$ end of routine — insert your code only before this line ж-ж 
* 
ENDFORM. " startup 


2. 特性 的 例 程 

在 更 新 规则 中 的 特性 合 程 编写 和 在 传输 规则 中 的 特性 例 程 编写 大 致 相同 ， 只 是 在 具 
体 的 参数 上 略 有 差别 ， 男 外 ， . 整 条 记录 产生 影响 ,但 是 在 更 
新 规则 中 可 以 针对 单独 的 关键 指标 进行 例 程 编写 ， 而 不 影响 其 他 关键 指标 对 于 某 个 特性 
的 更 新 。 

首先 ， 需 要 在 更 新 规则 中 创建 特性 的 例 程 ， 只 需 单 击 关键 指标 上 的 “类 ”图 标 ， 如 
图 5-69 所 示 。 


HENE | i = 
о вея < 销售 金额 Ыы 
D ”销售 价格 e| Тт hugs 


图 5-69 更 新 规则 中 的 “类 ” 


其 次 ， 在 “销售 数量 ”关键 指标 上 单 击 “ 类 ”后 ， 在 系统 弹出 的 对 话 框 中 ， 选 择 “ 特 
(E" HAE, ШЧ 5-70 所 孙 。 单 击 具体 特性 的 “方法 ”按钮 ， 进 入 “更 改 源 ”对 话 杠 
选中 “ 例 程 ” 单 选 按钮 进行 更 新 ， 如 图 5-71 所 示 。 
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区 更 新 规则 : 细节 x 


ГЕ т 
特征 юва | 关键 指标 ”| 销售 数量 
FFR 

ОДЕН 物料 组 

OG же [9 

ОВ) 主 数 据 属性 | 
0% 公式 B 
(се ч i 

Озінін 


мж 


图 $-71 选中 “ 例 程 ” 单 选 按钮 


最 后 ， 单 击 例 程 后 面 的 创建 图 标 四 ， 系 统 会 弹出 例 程 的 文本 描述 框 让 用 户 输入 ， 这 里 
输入 “根据 物料 号 确定 物料 组 ”， 如 图 5-72 所 示 。 


区 更 新 - 物料 组 : ӨНЕРІНЕ x 
名 称 | 根据 物料 号 确定 物料 组 


м ана |х| 


图 5-72 输入 例 程 的 文本 描述 


此 时 ， 进 入 例 程 的 编写 界面 ， 更 新 规则 特性 例 程 系统 生成 的 标准 代码 如 下 。 


PROGRAM UPDATE ROUTINE. 


*$*$ begin of global — insert your declaration only below this line ж-ж 
ж ТАВІЕ5.... 
第 1 部 分 
ж DATA: 
*$:*$ end of global — insert your declaration only before this line ж-ж 


FORM compute, key. field 
TABLES MONITOR STRUCTURE RSMONITOR " user defined monitoring 


| 第 2 部 分 
USING COMM. STRUCTURE LIKE /BIC/CSSINOIS04 
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RECORD ХО LIKE SY - TABIX 
RECORD ALL LIKE SY — TABIX 
SOURCE, SYSTEM LIKE RSUPDSIMULH - LOGSYS 
CHANGING RESULT LIKE /BIC/VSINOCO4T - /BIC/GOWLZ 

RETURNCODE LIKE SY – SUBRC 
ABORT LIKE SY – SUBRC. "set ABORT < > 0 to cancel update 

* 

*$*$ begin of routine — insert your code only below this line ж-ж 


ж fill the internal table " MONITOR" , to make monitor entries 


第 2 部 分 


ж result value of the routine 
RESULT = . 

* if the returncode is not equal zero, the result will not be updated 
RETURNCODE = 0. 


* if abort is not equal zero, the update process will be canceled 


ABORT = 0. 
*$:*$ end of routine - insert your code only before this line ж-ж 
ENDFORM. 
与 传输 规则 中 的 代码 不 同 的 是 ， 本 处 不 需要 选择 用 于 派生 目标 的 源 字 段 ， 而 是 包括 了 整 
个 通信 结构 。 


可 以 看 到 程序 的 结构 构成 如 下 : 

第 1 部 分 是 全 局 变量 声明 ， 之 前 在 开始 例 程 中 定义 的 变量 在 此 处 也 能 看 到 。 

第 2 部 分 也 是 程序 的 主题 部 分 ， 系 统 的 默认 名 称 是 compute_key_field。 主 体 部 分 除了 包 
含 一 个 ABORT 参数 外 ， 还 包含 了 一 个 RETURNCODE 参数 。 当 RETURNCODE 赋值 “ 非 0" 
时 ， 当 前 记录 的 目标 字段 (这 里 是 物料 组 ) 就 不 会 被 更 新 ; mM ABORT 被 赋值 “ 非 0” 
时 ， 整 个 数据 上 载 过 程 将 被 终止。 

示例 : 更 新 规则 中 的 特性 例 程 代码 如 下 。 


PROGRAM update, routine. 


*$*$ begin of global — insert your declaration only below this line ж-ж 
ж TABLES; ... 

* DATA: 

*$*$ епа of global — insert your declaration only before this line * 


FORM compute, key. field 
TABLES monitor STRUCTURE rsmonitor " user defined monitoring 
USING comm, structure LIKE / bic/cssinois04 
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record. no LIKE sy – tabix 
record, all LIKE sy – tabix 
source system LIKE rsupdsimulh - logsys 
CHANGING result LIKE /bic/vsinoc04t — /bic/g0wlz 

returncode LIKE sy — subrc 
abort LIKE sy —subre. "set ABORT < > 0 to cancel update 

* 

*$*$ begin of routine — insert your code only below this line 六 一 六 


ж fill the internal table " MONITOR" , to make monitor entries 


ж 使 用 物料 的 前 6 位 作为 物料 组 的 值 


result = comm, structure — /bic/g0wl(6). 


* if the returncode is not equal zero, the result will not be updated 


returncode - 0. 


* 


if abort is not equal zero, the update process will be canceled 


abort = 0. 
*$*$ end of routine — insert your code only before this line ж-ж 
ж 
ENDFORM. " compute. key. field 


编辑 完毕 后 ， 保 存 例 程 并 退出 ， 确 定 新 的 规则 后 ， 系 统 将 出 现 如 图 5-73 所 示 的 提示 


信息 。 


区 创建 特性 便 程 四 
传输 该 特性 的 例 程 


@ 被 传输 到 该 更 新 规则 的 所 有 指标 ? 


Ш 


图 5-73 ЗАР 系统 提示 信 ， 


该 提示 信息 提示 我 们 是 否 将 新 的 特性 的 更 新 规则 传输 到 所 有 的 关键 指标 中 ， 如 果 此 时 只 

需要 对 “销售 数量 ”进行 这 样 的 更 改 ， 那 么 就 单 击 “ 和 否 ” 按 钮 ; 如 果 对 于 所 有 的 关键 指 
标 都 需要 应 用 该 例 程 则 单 击 “ 是 ”按钮 。 

3. 关键 指标 的 例 程 

关键 指标 的 例 程 实施 和 特性 的 例 程 实施 几乎 一 样 ， 唯 一 不 同 的 是 ， 在 关键 指标 的 规则 定 
义 中 有 两 个 复 选 框 可 以 久 选 ， 一 个 是 “返回 表格 ”， 另 一 个 是 “ 例 程 中 的 单位 计算 ”， 如 
图 5-74 所 示 。 

如 果 我 们 和 希望 直接 使 用 来 源 中 的 单位 进行 更 新 ， 那 么 只 需 在 “ 例 程 的 单位 ”后 的 可 选 
单位 中 选择 一 项 即 可 ， 如 选择 “货币 名 称 代 码 ”， 则 在 其 下 的 “ 源 单位 ”中 ， 将 会 出 现 我 们 
所 选 的 单位 信息 ， 如 图 5-75 所 示 。 

如 果 匀 选 了 “ 例 程 中 的 单位 计算 ” 复 选 框 ， 那 么 “返回 表格 ” 复 选 框 和 其 下 的 单位 计 
算 信息 都 会 被 隐藏 起 来 ， 因 为 此 时 所 有 的 规则 都 将 在 例 程 中 进行 定义 ， 如 图 5-76 所 示 。 
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图 5-74 关键 指标 的 规则 细节 


图 5-75 “货币 名 称 代码 ”的 单位 信息 


图 5-76 选择 更 新 方法 为 带 单位 计算 的 “ 例 程 ” 
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Жи Ae UE fe ТЕ FH UR BR {у ECT А В Por Шуй, Jak we LOG IR Dre Ya BE TT TE Hl 
讲解 。 

以 上 步 又 进行 完毕 后 ， 单 击 例 程 创建 按钮 ， 系 统 进 入 例 程 文本 信息 输入 界面 ， 这 里 输入 
“根据 销售 数量 、 销售 金额 确定 销售 价格 信息 ”， 如 图 5-77 所 示 。 


[z =š - 销售 价格 : 创建 例 程 
名 称 根据 销售 数量 、 销 售 金 额 确定 销售 价格 信息 


WY 编辑 器 |Ж 


图 5-77 输入 例 程 文本 描述 


单 击 “ 编 辑 避 ”按钮 进入 例 程 编辑 界面 ， 系 统 上 自动 生成 的 标准 代码 如 下 : 


PROGRAM UPDATE_ROUTINE. 


*$*$ begin of global — insert your declaration only below this line ж-ж 
ж TABLES: ... 

* DATA: 

*$*$ end of global — insert your declaration only before this line ж-ж 


FORM compute, data field 
TABLES MONITOR STRUCTURE RSMONITOR " user defined monitoring 
USING COMM, STRUCTURE LIKE /BIC/CSSINOIS04 
RECORD. NO LIKE SY - TABIX 
RECORD. ALL LIKE SY - TABIX 
SOURCE SYSTEM LIKE RSUPDSIMULH - LOGSYS 
CHANGING RESULT LIKE /BIC/VSINOCO4T - /BIC/KO0XSJG 
RETURNCODE LIKE SY - SUBRC 
ABORT LIKE SY ~ SUBRC. "set ABORT < > 0 to cancel update 
* 
*$*$ begin of routine — insert your code only below this line ж-ж 


ж fill the internal table " MONITOR" , to make monitor entries 


* result value of the routine 
RESULT = . 

* if the returncode is not equal zero, the result will not be updated 
RETURNCODE - 0. 

* if abort is not equal zero, the update process will be canceled 


ABORT = 0. 


*$*$ end of routine — insert your code only before this line ж-ж 
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ж 


ENDFORM. 


可 以 看 到 ， 程 序 的 结构 与 之 前 的 特性 例 程 一 样 ， 均 由 变量 定义 和 程序 主体 部 分 构成 ， 只 
需 在 程序 的 主体 部 分 加 上 我 们 需要 的 代码 ， 并 更 新 参数 result 的 值 即 可 。 
示例 : 更 新 规则 中 的 关键 指标 例 程 代 码 如 下 。 


PROGRAM update, routine. 


*$*$ begin of global — insert your declaration only below this line ж-ж 
ж TABLES: ... 

ж DATA: 

*$*$ end of global - insert your declaration only before this line ж-ж 


FORM compute, data, field 
TABLES monitor STRUCTURE rsmonitor " user defined monitoring 
USING comm, structure LIKE /bic/cssinois04 
record, no LIKE sy — tabix 
record. all LIKE sy – tabix 
source system LIKE rsupdsimulh - logsys 
CHANGING result LIKE /bic/vsinoc04t — /bic/kOxsjg 
returncode LIKE sy — subrc 
abort LIKE sy – subre. "set ABORT < > 0 to cancel update 
* 
*$*$ begin of routine — insert your code only below this line ж-ж 


ж fill the internal table " MONITOR" , to make monitor entries 


* result value of the routine 
IF comm, structure ~ /bic/kOxssl < > 0. 
result = comm, structure — /bic/k0xsje/comm, structure — /bic/kOxssl. 
ELSE. 
result = 0. 
ENDIF. 
* if the returncode is not equal zero, the result will not be updated 
returncode - 0. 


ж if abort is not equal zero, the update process will be canceled 


abort = 0. 
*$*$ end of routine — insert your code only before this line ж-ж 
* 
ENDFORM. " compute. data, field 
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4. 单位 的 转换 例 程 

ТЕ BW 系统 中 ， 很 多 时 候 需 要 对 单位 进行 处 理 ， 例 如 ， 对 于 大 型 集团 企业 而 言 ， 可 能 
子 公司 或 分 公司 位 于 海外 ， 因 此 和 凭证 的 记 账 货币 可 能 不 同 于 国内 的 货币 ,如 HKD. USD, 
EUR, JPY 等 ， 因 此 常常 需要 按照 一 定 的 规则 对 货币 或 单位 进行 转换 。 

BW 本 身 提供 了 在 报表 上 进行 单位 转换 的 功能 ， 但 是 更 新 规则 本 身 的 目的 就 是 为 了 报表 
服务 ， 我 们 有 时 可 能 直接 就 需要 得 到 最 终 的 结果 ， 然 后 存储 在 系统 中 ， 以 提高 报表 运行 的 
性 能 。 

以 下 是 几 个 常用 的 函数 ， 在 项 目 中 经 常会 用 到 ， 这 里 举例 说 明 。 

示例 : 将 外 币 转换 为 本 位 币 ， 代 码 如 下 。 


CALL FUNCTION CONVERT TO LOCAL CURRENCY 


EXPORTING 
date = sy — datum 
foreign amount = foreign. amount 
foreign. currency = foreign. currency 
local currency = local currency 
type. of rate ЕМ 
IMPORTING 
local. amount = local. amount 
EXCEPTIONS 
OTHERS =1. 


IF sy —subrc < > 0. 
ж MESSAGE ID SY — MSGID TYPE SY - MSGTY NUMBER SY - MSGNO 
* WITH SY - MSGV1 SY - MSGV2 SY - MSGV3 SY - MSGVA. 
ENDIF. 


示例 : 将 本 位 币 转换 为 外 币 ， 代 码 如 下 。 


CALL FUNCTION CONVERT TO FOREIGN. CURRENCY 


EXPORTING 
date = sy — datum 
foreign. currency = foreign. amount 
local. amount = local. amount 
local. currency = local. currency 
type. of rate ЕМ 
IMPORTING 
foreign amount = foreign. amount 
EXCEPTIONS 
OTHERS =l; 


IF sy - subre < > 0. 
ж MESSAGE ID SY - MSGID TYPE SY – MSGTY NUMBER SY - MSGNO 
* WITH SY - MSGV1 SY - MSGV2 SY -MSGCV3 SY - MSGVA. 
ENDIF. 
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示例 : 单位 和 基本 单位 之 间 的 转换 ， 代 码 如 下 。 


CALL FUNCTION UNIT CONVERSION. SIMPLE 


EXPORTING 

input = | amount 

unit in -] unit 

unit, out =] base uom 
IMPORTING 

output =] base amount 
EXCEPTIONS 

OTHERS =1 


IF sy —subre < > 0. 
ж MESSAGE ID SY - MSGID TYPE SY - MSGTY NUMBER SY - MSGNO 
* WITH SY - MSGV1 SY - MSGV2 SY - MSCV3 SY - MSGVA. 
ENDIF. 


5. 返回 表格 的 例 程 

返回 表格 的 例 程 和 其 他 所 有 的 例 程 都 有 所 区 别 ， 因 为 只 有 这 一 个 地 方 我 们 能 按照 目标 的 
结构 返回 数据 记录 ， 并 且 直 接 计 算 目 标 (信息 块 ) 的 结果 。 

如 果 选 择 “ 返 回 表 格 ”的 方式 对 关键 指标 进行 处 理 ， 则 所 有 的 逻辑 ， 包 括 指标 的 计算 
以 及 单位 的 处 理 都 将 在 返回 表 中 进行 。 和 创建 例 程 一 样 ， 色 选 “ 返 回 表格 ” 复 选 框 后 ， 单 
击 创建 按钮 ， 如 图 5-78 所 示 。 


EHDA 

О 48 йн 

O96 Ast zu) 
өті pe NEN 

回 返 回 表格 


目标 单位 
货币 名 称 代码 


图 5-78 “返回 表格 ” 例 程 


此 时 ， 系 统 会 弹出 对 话 框 ,提示 对 返回 表格 例 程 的 文本 描述 进行 输入 ， 这 里 输入 “ 根 
据 DSO 700590 收 到 的 库存 记录 计算 库 龄 ”， 如 图 5-79 所 示 。 
单 击 “编辑 器 ”按钮 ， 进 入 例 程 编辑 界面 ， 系 统 自动 生成 的 标准 代码 如 下 。 
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有 EE 二 新 -销售 价格 : ӨНЕР? 
名 称 根据 DSO 200590 收 到 的 库存 记录 计算 库 龄 | 


v^ 编辑 器 |% 


图 5-79 输入 例 程 文本 描述 


PROGRAM UPDATE_ROUTINE. 


*$*$ begin of global — insert your declaration only below this line * 
ж TABLES: ... 

* DATA: 

*$*$ end of global — insert your declaration only before this line ж-ж 


FORM compute, data, field 
TABLES MONITOR STRUCTURE RSMONITOR " user defined monitoring 
RESULT TABLE STRUCTURE /BIC/VSINOCOAT 
USING COMM, STRUCTURE LIKE /BIC/CSSINOIS04 
RECORD. NO LIKE SY -TABIX 
RECORD. ALL LIKE SY - TABIX 
SOURCE SYSTEM LIKE RSUPDSIMULH - LOGSYS 
ICUBE VALUES LIKE /BIC/VSINOCO4T 
CHANGING RETURNCODE LIKE SY - SUBRC 
ABORT LIKE SY - SUBRC. "set ABORT < > 0 to cancel update 
* 
*$*$ begin of routine — insert your code only below this line ж-ж 


ж fill the internal table " MONITOR" , to make monitor entries 


ж if the returncode is not equal zero, the result will not be updated 
RETURNCODE - 0. 
* if abort is not equal zero, the update process will be canceled 


ABORT = 0. 


*$*$ end of routine — insert your code only before this line ж-ж 


ж 


ENDFORM. 


我 们 可 以 看 到 程序 的 结构 和 之 前 的 关键 指标 例 程 一 样 ， 都 由 变量 定义 和 程序 主体 部 
分 构成 。 除 了 经 常见 到 的 参数 MONITOR, COMM, STRUCTURE, RECORD. NO, RECORD 
_ALL、SOURCE_SYSTEM 以 及 控制 参数 RETURNCODE, ABORT 外 ， 这 里 增加 了 两 个 参 
Ж, ШІ RESULT. TABLE 代替 了 RESULT, ICUBE_VALUES 结构 包含 了 需要 派生 出 的 最 终 
结果 的 结构 。 

根据 读 取 ZODS90 中 物料 库存 数量 计算 出 的 当前 库存 的 库 龄 分 布 ， 代 码 如 下 。 
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PROGRAM update, routine. 


*$:*$ begin of global — insert your declaration only below this line * 
ж TABLES: ... 

DATA: it ods LIKE TABLE OF /bic/azods9000 WITH HEADER LINE. 

* DATA: 

*$*$ end of global — insert your declaration only before this line ж-ж 


FORM compute, data, field 
TABLES monitor STRUCTURE rsmonitor " user defined monitoring 
result table STRUCTURE /bic/vsinoc04t 
USING comm, structure LIKE /bic/cssinois04 
record, no LIKE sy - tabix 
record, all LIKE sy – tabix 
source system LIKE rsupdsimulh - logsys 
icube, values LIKE /bic/vsinoc04t 
CHANGING returncode LIKE sy — subrc 
abort LIKE sy – subrc. "set ABORT < > 0 to cancel update 
* 
*$*$ begin of routine — insert your code only below this line ж-ж 
ж fill the internal table " MONITOR" , to make monitor entries 
* //1E load stock 进 CUBE 时 ,在 UPDATE ROUTINE 中 用 RETURN TABLE 添加 新 的 库 龄 行 ， 
TYPE -20 为 库 龄 标志 
ж//ТҮРЕ = 10 为 库存 ,TOT_STKQTY 为 通信 结构 中 的 库存 字段 
DATA: 1 stock ТҮРЕ p DECIMALS 3. 
DATA: 1 currdate LIKE sy — datum. 


] currdate = sy — datum . 


1 stock = comm, structure — tot, stkqty. 


MOVE - CORRESPONDING comm, structure TO result, table. 
result, table — /bic/zvaltype = 10. 
ж RESULT TABLE -/BIC/ZMRPDATE = SY - DATUM. 


APPEND result. table . "将 库存 记录 加 入 内 表 
CLEAR result, table — tot. stkqty. еза ига 
result table – /bic/zvaltype = 20. "修改 值 类 型 标志 


* 取 该 物料 的 相关 物料 移动 记录 到 表 it. ods 
SELECT plant material stor_loc rectotstck calday 
INTO CORRESPONDING FIELDS OF it_ods 
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FROM /bic/azods9000 
WHERE material 2 comm, structure — material 
AND plant = comm, structure — plant 
AND stor. loc = comm, structure - stor. loc 
AND calday <= 1 currdate 
ORDER BY calday DESCENDING. 

IF it ods – rectotstck >= 1 stock . 


result. table — quantity 21 stock . 


result. table — /bic/zaging 21 currdate – it, ods – calday . 


1 stock 20 . 

APPEND result, table. 

EXIT. "如 果 所 有 库存 数 都 已 计算 完 库 龄 , 则 退出 循环 
ELSE. 


result. table — quantity = it, ods — rectotstck . 
result. table — /bic/zaging 21 currdate – it, ods – calday . 
1 stock 21 stock — it. ods - rectotstck 
APPEND result, table. 
ENDIF. 
* 清除 工作 区 的 quantity 字段 和 aging 字段 
CLEAR result_table - quantity . 
CLEAR result, table — /bic/zaging . 
ENDSELECT. 


« 剩余 的 归 类 到 大 于 90 天 的 库存 
IF l1 stock > 0. 


result. table — quantity 21 stock . 


result. table — /bic/zaging 291 . 
APPEND result, table. 
ENDIF. 
ж if the returncode is not equal zero, the result will not be updated 
returncode - 0. 
ж if abort is not equal zero, the update process will be canceled 


abort = 0. 


*$*$ end of routine — insert your code only before this line ж-ж 
Ж 
ENDFORM. " compute, data, field 
5.6.3 单元 小 结 
ТЕ BW 3.X 中 ， 系 统 并 没有 提供 转换 对 数据 进行 清洗 和 转换 ， 而 是 提供 了 传输 规则 和 更 


新 规则 的 方式 进行 数据 转换 。 传 输 规则 连接 数据 源 和 信息 源 ， 更 新 规则 连接 信息 源 和 数据 目 
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标 。 看 起 来 ， 传 输 规 则 和 更 新 规则 的 功能 没有 太 大 区 别 ， 实 际 上 传输 规则 只 能 一 对 一 的 进行 
数据 传输 ， 但 是 一 个 信息 源 可 以 通过 更 新 规则 更 新 到 不 同 的 数据 目标 ， 同 时 更 新 规则 中 提供 
了 “返回 表格 ”的 功能 ， 可 以 将 一 条 记录 转换 为 多 条 记录 。 

一 般 来 说 ， 在 传输 规则 中 进行 的 例 程 处 理 主要 是 检查 来 自 源 系 统 的 数据 是 否 符合 规范 ， 
或 从 一 个 特性 派生 出 它 的 属性 ， 如 从 物料 派生 出 物料 组 这 些 对 于 所 有 数据 目标 来 说 都 具有 通 
用 性 ;而 在 更 新 规则 中 ， 实 际 上 是 针对 特定 的 数据 目标 进行 各 种 逻辑 转换 ， 对 单独 的 数据 目 
标 来 说 ， 具 有 其 特殊 性 。 


5.7 ”实战 经 验 分享 一 一 如 何在 项 目 中 更 好 地 组 织 例 程 的 编写 


在 大 型 或 特大 型 项 目 中 ， 各 个 项 目 组 为 了 满足 这 样 或 那样 的 项 目 需求 ， 往 往 会 在 同一 个 
BW 系统 编写 成 于 上 万 的 ABAP 例 程 。 这 些 例 程 有 时 随 着 编写 该 例 程 的 顾问 的 离开 而 石 沉 大 
海 ， 等 到 发 现 使 用 该 转换 或 规则 的 数据 发 生 了 错误 ,或 由 于 出 现 了 意外 情况 而 导致 该 段 例 程 
发 生 运行 错误 ， 才 会 被 男 外 的 顾问 发 现 并 纠正 。 出 现 这 样 的 情况 无 疑 对 一 个 集团 项 目 来 说 是 
难以 想象 的 ， 其 至 可 以 说 是 致命 的 。 由 于 现在 大 多 数 公司 使 用 的 产品 都 是 BW 7. X， 因 此 本 
节 着 重 对 BW 7. X 中 的 例 程 编写 和 管理 进行 概要 介绍 。 

首先 ， 我 们 需要 对 所 有 的 例 程 进行 集中 管控 ， 包 括 建立 、 修 改 和 维护 等 各 个 例 程 的 生命 
周期 管理 过 程 。 在 BW 7. X 中 ,使 用 最 多 的 例 程 是 开始 例 程 和 结束 例 程 ， 由 于 需要 对 例 程 进 
行 集中 管控 ， 因 此 不 建议 在 大 型 项 目 中 使 用 特性 的 例 程 或 关键 指标 的 例 程 ， 因 为 这 样 这 些 例 
程 就 游离 于 集中 管控 范围 之 外 了 ， 笔 者 建议 将 所 有 的 特性 和 关键 指标 例 程 放 到 结束 例 程 中 。 


5.7.1 建立 集中 的 转换 管控 配置 表 


为 了 达到 集中 管控 的 目的 ， 需 要 新 建 一 个 管控 表 ， 该 表 包 含 了 转换 的 源 、 目 标 、 例 程 类 
型 (开始 和 结束 )、 调 用 的 函数 以 及 相关 的 配置 参数 。 设 置 配置 参数 是 为 了 防止 在 开始 或 结 
束 例 程 中 需要 读 取 别 的 数据 表 而 增加 的 字段 。 表 的 结构 如 图 5-80 所 示 。 


转帐 表 ZDEW PZ 01 | 激活 

短文 本 ШЕШІ. 
Attributes , Delivery and Maintenance Entry help/check , Currency/Quantity Fields 

[и е eal (М) енер || Predefined туре 

Key |Initia. | 数据 元 素 数据 类 型 | 长 度 hbi Ext 

NANDT Л| [v MANDT CLNT 3 Ox Pug 
ZPZ SOURCE ЛЛ | М ZPZ SOURCE CHAR 30 0 转换 源 
ZPZ DESTNAT 7i М ZPZ DESTNAT CHAR 30 0 转换 目标 
ZPZ ТҮР 四 | М ZPZ ТҮР CHAR 2 0 转换 类 型 
ZPZ SEQUEN 四 | 回 ZPZ SEQUEN CHAR 2 0 步骤 
ZPZ FUNCT ZPZ FUNCT CHAR 30 0 处 理 函 数 

| |zPZ DEBUG ZPZ DEBUG CHAR 1 0 人 调试 

| |ZPZ PARAi ZPZ PARAI CHAR 30 оет 

| |ZPZ PARA2 ZPZ PARA2 CHAR 30 0 转换 参数 2 
ZPZ PARAS ZPZ PARAS CHAR 30 0 转换 参数 3 
ZPZ PARA4 O| O ZPZ PARA4 CHAR 30 0 转换 参数 4 
ZPZ PARAS ZPZ PARA5 CHAR 30 0 转换 参数 5 
ZPZ PARA6 ZPZ PARAG CHAR 30 0 转换 参数 6 
ZPZ PARAT | O 2Р2 РАВАТ CHAR 30 0383828387 
ZPZ РАКАВ ZPZ РАКАВ CHAR 30 0 转换 参数 8 
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当然 ， 如 果 需 要 更 多 的 参数 字段 ， 也 可 以 在 当前 表 的 基础 上 进行 转换 参数 的 增加 。 为 了 
达到 配置 的 目的 ， 还 需要 为 该 表 进 行 表格 维护 工具 的 建立 以 及 相关 函数 组 的 建立 。 

通过 该 配置 表 的 建立 ， 我 们 就 希望 任何 开始 例 程 和 结束 例 程 在 例 程 编写 时 都 读 取 本 配置 
表 ， 从 本 配置 表 中 读 取 和 需要 的 函数 ， 以 便 进行 相关 的 人 逻辑 人 处理， 这 样 就 达到 了 集中 管控 的 
目的 。 


5.7.2 读 取 配置 表 的 INCLUDE 程序 的 编写 


新 建 配 置 表 后 ， 我 们 必须 让 所 有 的 开始 例 程 和 结束 例 程 都 来 读 取 此 配置 表 中 的 内 容 ， 然 
后 调用 指定 的 函数 和 参数 对 数据 进行 处 理 。 由 于 开始 例 程 和 结束 例 程 的 输入 和 输出 参数 不 一 
样 ， 因 此 需要 分 别 新 建 一 个 INCLUDE 程序 。 新 建 的 INCLUDE 程序 应 该 是 通用 的 ， 也 就 是 在 
开始 例 程 和 结束 例 程 中 不 进行 代码 的 编写 ， 而 只 是 将 该 INCLUDE 程序 包括 在 内 。 开 始 例 程 
中 的 INCLUDE 参照 程序 如 下 。 


жб ж 
* & Бі ZDBW INCL KSLC 
* & Create by Martin XIE 
ж & * 
DATA : re г src ТҮРЕ rsbksrenm . "转换 源 
DATA : тег tgt TYPE rsbktgtnm . " 转换 目标 
DATA : lt lehspzb ТҮРЕ TABLE ОҒ zdbw pz Ol. " 例 程 函数 配置 表 中 所 有 符合 的 开始 例 程 
DATA : wa_lchspzb ТҮРЕ zdbw_pz_01. 
DATA: lt local package TYPE ty t sc 1," f£ ty t sc 1 的 本 地 结构 ,方便 对 SOURCE. PACK- 
AGE 做 处 理 

ls local fields ТҮРЕ іу в sc. 1. "f£ ty. в sc 1 的 本 地 结构 ,方便 获取 SOURCE _ 
FIELDS 字段 
DATA: 1 run func ТҮРЕ c. 


re r src = pr request —» get src( ). 


re гіі = pr request —» get tgt( ) . 


SELECT ж INTO TABLE lt lchspzb 
FROM zdbw pz Ol  " 例 程 函 数 配置 表 中 所 有 符合 的 开始 例 程 
WHERE zpz_source -те r src AND zpz destnat -ге г ісі 
AND zpz_typ = KS. 


SORT 1 Ichspzb BY zpz sequen . 
LOOP AT lt lchspzb INTO wa lchspzb . 


IF wa, lchspzb — zpz funct IS INITIAL . "函数 为 空 
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CONTINUE . 
ENDIF. 


CALL FUNCTION ' FUNCTION. EXISTS 


EXPORTING 


"检查 函数 是 否 存在 


funcname = wa_lchspzb - zpz funct 


EXCEPTIONS 
function, not, exist 
IF sy - subre NE 0. 
CONTINUE . 
ENDIF . 


CLEAR 1. run, func. 
IF sy - раіс = ' X. 
IF ма lchspzb —zpz debug NE X . 
1 run func = X. 
ENDIF. 
ELSE. 
] run fune + X. 


ENDIF. 


CHECK l run fune = X. 


CALL FUNCTION wa, Ichspzb — zpz. funct 


EXPORTING 
ir request 
1 request 
i datapackid 
ls params 
TABLES 
ct, source package 
сі local, package 
ct, monitor 
CHANGING 
cs, source, fields 
EXCEPTIONS 


cx rsrout abort =4. 


IF sy - subre NE 0. 


=1. 


"系统 处 于 后 台 执 行 状 态 
"是 否 调试 执行 


"系统 处 于 调试 状态 


"执行 配置 表 函 数 


-р.т request 
= request 

= datapackid 
= ма lchspzb 


= source package 
-]t local package 


= monitor 


Е ls local fields 


RAISE EXCEPTION ТҮРЕ cx rsrout. abort. 
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ENDIF. 


ENDLOOP . 


以 下 是 结束 例 程 中 的 INCLUDE 参照 程序 。 


ж $ ж 
*& Include ZDBW INCL JSLC 
*& * 
DATA : re r src TYPE rsbksrenm . "转换 源 
DATA : тегісі TYPE rsbktgtnm . " 转换 目标 
DATA : lt 1сһвр/) ТҮРЕ TABLE OF хам pz Ol. " 例 程 函 数 配置 表 中 所 有 符合 
的 开始 例 程 
DATA : wa lchspzb TYPE  zdbw pz 01. 
DATA: lt local package TYPE ty t tg 1," f£ ty t sc 1 的 本 地 结构 ,方便 对 SOURCE_ 
PACKAGE 做 处 理 

ls. local, fields TYPE ty s tg 1. "f£ ty s sc 1 的 本 地 结构 ,方便 获取 SOURCE 


FIELDS 字段 


DATA: 1 run func TYPE c. 


re т sic = рт request 一 > get. src( ). 


ге г itgt = p r request —» get tgt( ). 


SELECT ж INTO TABLE 1 lchspzb FROM zdbw_pz 01 " 例 程 函数 配置 表 中 所 有 符合 的 
开始 例 程 
WHERE zpz source = re r src AND zpz destnat -те г ісі 
AND zpz їур = JS . 


SORT 1 lchspzb BY zpz sequen. "根据 步骤 号 排序 
LOOP AT lt_lchspzb INTO wa_lchspzb. 
IF wa_lchspzb — zpz_funct IS INITIAL . ШЕР ЛӘДЕ А 
CONTINUE . 
ENDIF. 
CALL FUNCTION ' FUNCTION EXISTS — "检查 函数 是 否 存在 
EXPORTINC 


funcname = wa_lchspzb - zpz_funct 
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EXCEPTIONS 


IF sy - subre МЕ 0. 
CONTINUE . 
ENDIF . 


CLEAR 1. run, func. 
IF sy - раіс = ' X. 


] run, fune = X . 
ENDIF. 
ELSE. 
] run fune = X . 


ENDIF. 


CHECK 1 run fune: X. 


* BREAK - POINT. 


EXPORTING 
ir request 
1 request 
i datapackid 
ls params 
TABLES 
ct, result. package 
сі local, package 
ct monitor 
CHANGING 
cs, result. fields 
* cs monitor 
EXCEPTIONS 
cx rsrout abort 


IF sy — subrc NE 0. 


ENDIF. 


ENDLOOP. 


IF ма lchspzb —zpz debug NE X. 


function, not, exist = 1. 


"函数 不 存在 


"系统 处 于 后 台 执 行 状态 
"是 否 调试 执行 


"系统 处 于 调试 状态 


CALL FUNCTION wa_lchspzb -zpz_funct  " 执行 INCLUDE 函数 


—p r request 
= request 
= datapackid 


= wa, lchspzb 


= result. package 
= П local package 


= monitor 


= 15 local fields 


= monitor 


-4. 


RAISE EXCEPTION ТҮРЕ cx rsrout. abort. 


5.7.3 ”开始 例 程 函数 的 编号 


为 了 在 开始 例 程 中 使 用 系统 标准 的 类 型 ， 首 先 必须 在 开始 例 程 函 数组 的 抬头 部 分 增加 对 


于 类 型 池 的 声明 : 
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TYPE - POOLS: rsd, rstr. 


在 开始 例 程 中 ， 相 关 的 参数 为 REQUEST、DATAPAKID 、MONITOR SOURCE. PACK- 
AGE 和 CX_RSROUT_ABORT， 因 此 ， 开 始 例 程 的 相关 参数 设置 如 下 : 


(D 输入 接口 
IR_REQUEST 管理 表 和 请 求 之 间 的 接口 
I REQUEST 请 求 号 
I DATAPACKID 数据 包 信息 
IS PARAMSZDBW. PZ 01 配置 表 内 容 
@ 变更 


CS SOURCE FIELDS 源 结 构 
Э 运算 表 
CT SOURCE, PACKAGE 源 表 


СТ LOCAL PACKAGE 本 地 表 
CT_MONITOR 监控 消息 


@ 例外 


CX_RSROUT_ABORT 取消 处 理 


开始 例 程 函数 的 输入 参数 设置 如 图 5-81 所 示 ， 输 出 参数 设置 如 图 5-82 所 示 ， 变 更 参 
数 设置 如 图 5-83 所 示 ， 表 参数 设置 如 图 5-84 所 示 ， 例 外 参数 设置 如 图 5-85 所 示 。 


ЖЕН 4 X. Pass. 
IR REQUEST TYPE REF TO IF RSBK REQUEST ADMINTABE VIEW М | M Interface Between IPRO Admin Tab and Request 


I REQUEST [TYPE RSREQUEST ММ ж сир 
I DATAPACKID ТҮРЕ RSDATAPID ММ 数 据 文档 编号 
IS РАКАИ5 ТҮРЕ ZDEW PZ 01 ММ рта 


65-81 开始 例 程 函数 的 输入 参数 


5-82 ”开始 例 程 函 数 的 输出 参数 


|4 5-83 ”开始 例 程 函数 的 变更 参数 
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CT LOCAL PACKAGE 
СТ MONITOR TYPE RSTR TY T MONITORS (4 


5-84 ИИН RAIRA% 


(Cancel 


图 5-85 开始 例 程 函数 的 例外 参数 


开始 例 程 函数 的 代码 如 下 。 


FUNCTION zdbw_ks_ds01_c01. 


ж" æ" Local interface; 


ж"  [MPORTING 


ж" VALUE(IR REQUEST) TYPE REF ТО IF RSBK REQUEST ADMINTAB VIEW 
ж OPTIONAL 

ж" VALUE(I REQUEST) ТҮРЕ  RSREQUEST OPTIONAL 

ж" VALUE(I DATAPACKID) ТҮРЕ  RSDATAPID OPTIONAL 
ж VALUE(IS PARAMS) ТҮРЕ ZDBW PZ 01 OPTIONAL 

*" TABLES 

ж СТ SOURCE. PACKAGE OPTIONAL 

ж" CT LOCAL PACKAGE OPTIONAL 

ж CT MONITOR ТҮРЕ RSTR TY T MONITORS OPTIONAL 
ж" CHANGING 

ж VALUE(CS SOURCE FIELDS) OPTIONAL 

ж" RAISING 

ж CX RSROUT ABORT 


x***” 此 处 是 标准 的 field — symobls 定义 жао 
FIELD -SYMBOLS: «fs source fields > TYPE ANY. 
seek ”此 处 定义 处 理 中 需要 用 到 的 个 性 化 字段 soiree 
* 逻辑 系统 
FIELD - SYMBOLS: <logsys > ТҮРЕ ANY. 
ж 记录 类 型 
FIELD -SYMBOLS: <recordmode > ТҮРЕ ANY. 
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Ж ----------- 删除 其 他 逻辑 系统 的 数据 
LOOP АТ ct, source package ASSIGNING «fs source fields >. 
* 逻辑 系统 
ASSIGN COMPONENT LOGSYS ОҒ STRUCTURE «fs source fields > ТО < logsys >. 
* 记录 类 型 
ASSIGN COMPONENT RECORDMODE ОЕ STRUCTURE «fs source fields > TO < record- 


mode >. 
IF «logsys» < > IDSCLNTS800 . “IDS 系统 CIENT 800 
DELETE сі. source, package. 
ENDIF. 


ENDLOOP. 


ENDFUNCTION. 


5. T. 


于 类 


4 ”结束 例 程 函数 的 编号 


为 了 在 结束 例 程 中 使 用 系统 标准 的 类 型 ， 首 先 必 须 在 结束 例 程 函数 组 的 抬头 部 分 增加 对 
型 池 的 声明 : 


TYPE - POOLS; rsd, rstr. 


在 结束 例 程 中 ， 相 关 的 参数 为 REQUEST、DATAPAKID 、MONITOR RESULT. PACK- 


AGE 和 CX_RSROUT_ABORT， 因 此 ， 结 束 例 程 的 相关 参数 设置 如 下 : 
(D 输入 接口 
IR_REQUEST 管理 表 和 请 求 之 间 的 接口 
I REQUEST 请 求 号 
I DATAPACKID 数据 包 信息 
IS_PARAMSZDBW_PZ 01 配置 表 内 容 
D 变更 
CS SOURCE. FIELDS 源 结构 
© 运算 表 


CT RESULT PACKAGE HRK 
СТ LOCAL PACKAGE 本 地 表 
CT_MONITOR 监控 消息 


@ 例外 


CX_RSROUT_ABORT 取消 处 理 
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结束 例 程 函数 的 输入 参数 设置 如 图 5-86 所 示 ， 输 出 参数 设置 如 图 5-87 所 示 ， 变 更 参 


数 设 置 如 图 $-88 所 示 ， 表 参数 设置 如 图 $-89 所 示 ， 例 外 参数 设置 如 图 5-90 所 示 。 


IR REQUEST ТҮРЕ REF TO IF RSEK REQUEST ADMINTAB VIEW | 

I REQUEST ТҮРЕ RSREQUEST мМ М 请 求 GUD 

I DATAPACKID ТҮРЕ RSDATAPID | | 回 数据 文档 编号 
IS PARANS ТҮРЕ ZDBW PZ 01 м М рн 


85-86 Е РАНО АЖ 


参考 打印 


图 $-87 结束 例 程 函数 的 输出 参数 


CS RESULT FIELDS | [ [иш E Tm 


图 $-88 结束 例 程 函 数 的 变更 参数 


СТ LOCAL PACKAGE | 
CT. MONITOR TYPE КЕТЕ ТҮ ТОК ITORS 


85-80 结束 例 程 函 数 的 表 参 数 


图 E E E [E M Exceptn Classes 


CX RSROUT,. ABORT Cancel 


图 5-90 ”结束 例 程 函数 的 例外 参数 
结束 例 程 函数 的 代码 如 下 。 


FUNCTION zdbw_ks_ds01_c01. 


ж. 


ж" ж "Local interface; 


ж"  [MPORTING 


ж VALUE(IR REQUEST) TYPE REF ТО ІК RSBK REQUEST ADMINTAB VIEW 
ж OPTIONAL 

ж VALUE(I REQUEST) ТҮРЕ  RSREQUEST OPTIONAL 

ж" VALUE(I DATAPACKID) ТҮРЕ  RSDATAPID OPTIONAL 

ж VALUE(IS PARAMS) ТҮРЕ ZDBW PZ 01 OPTIONAL 
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ж" TABLES 


ж СТ SOURCE PACKAGE OPTIONAL 

ж СТ LOCAL PACKAGE OPTIONAL 

ж CT MONITOR TYPE КТК TY T MONITORS OPTIONAL 
ж" CHANGING 

ж VALUE(CS SOURCE FIELDS) OPTIONAL 

ж" RAISING 

ж CX, RSROUT АВОВТ 


* 根据 销售 订单 类 型 判断 长 期 合同 编号 
FIELD -SYMBOLS: «result fields > 
< gÜxszz > 
< g0xsqd > 
< g0cpz > 
< gO0xdkzfw > 
< g0xsddlx > 
< doc_number > 
< g0xshtbh > 
< g0cqhtbh > 


TYPE ANY, 
TYPE ANY, “" 销 售 组 织 
TYPE ANY, "销售 渠道 
ТҮРЕ ANY, "产品 组 

TYPE АМҮ, "信贷 控制 范围 
TYPE АМҮ, "销售 订单 类 型 
TYPE ANY, "销售 凭证 编号 
TYPE ANY, "合同 编号 
TYPE ANY. "长 期 合同 编号 


( DIVISION) 


LOOP АТ ct_result_package ASSIGNING < result_fields >. 


* 销售 组 织 
ASSIGN COMPONENT /BIC/GOXSZZ 
< gÜxszz >. 
* 销售 渠道 
ASSIGN COMPONENT /BIC/GOXSQD 
< g0xsqd >. 
ж 产品 组 (DIVISION ) 
ASSIGN COMPONENT /BIC/GOCPZ 
< gÜcpz >. 
* 信贷 控制 范围 
ASSIGN COMPONENT /BIC/GOXDKZFW 
< gOxdkzfw >. 
* 销售 订单 类 型 
ASSIGN COMPONENT /BIC/GOXSDDLX 
< gÜxsddlx >. 
* 销售 凭证 编号 
ASSIGN COMPONENT DOC NUMBER 
< doc, number >. 
* 合同 编号 
ASSIGN COMPONENT /BIC/GOXSHTBH 
< gOxshtbh >. 


z 


OF STRUCTURE 


OF STRUCTURE 


OF STRUCTURE 


OF STRUCTURE 


OF STRUCTURE 


OF STRUCTURE 


OF STRUCTURE 


« result. fields > 


< result. fields > 


< result. fields > 


« result. fields > 


« result. fields > 


< result. fields > 


« result. fields > 


TO 


TO 


TO 


TO 


TO 


TO 


TO 
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* 长 期 合同 编号 
ASSIGN COMPONENT /BIC/GOCQHTBH OF STRUCTURE < result. fields > 
TO «egOecqhtbh >. 


* 进行 长 期 合同 编号 的 赋值 ,订单 类 型 ZR8A 要 么 取 销 售 凭证 编号 ,否则 取 销 售 合 同 编号 
IF < g0xsddlx > IS ASSIGNED AND < doc, number > IS ASSIGNED 
AND «gOxshtbh > IS ASSIGNED AND < gOcqhtbh > IS ASSIGNED. 


IF < gOxsddlx >= 72701. 
< e0cqhtbh >= < doc, number >. 
ELSEIF < gOxsddlx > < > 72701. 
< e0cqhtbh >= < gOxshtbh >. 
ENDIF. 
ENDIF. 


* 根据 销售 组 织 销售 渠道 和 产品 组 获得 信贷 控制 范围 
IF <g0xszz > IS ASSIGNED AND <g0xsqd > IS ASSIGNED 
AND <g0cpz> IS ASSIGNED AND < gOxdkzfw > IS ASSIGNED. 


IF is. params - zpz paral IS NOT INITIAL. 
SELECT SINGLE gOxdkzfw 
INTO « gOxdkzfw » 
FROM(is params — zpz paral) 
WHERE gOxszz = < g0xszz > 
AND e0xsqd = < e0xsqd > 
AND g0cpz = <g0cpz >. 
ENDIF. 
ENDIF. 


ENDLOOP. 


ENDFUNCTION. 


5.7.5 ”转换 中 的 开始 例 程 和 结束 例 程 

由 于 我 们 开发 了 公用 的 INCLUDE 程序 ， 因 此 在 转换 中 ， 开 始 例 程 和 结束 例 程 的 创建 不 
需要 进行 大 量 代 码 的 编写 ， 以 下 是 例 程 的 举例 。 

集中 管理 后 的 开始 例 程 代 码 如 下 。 
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PROGRAM trans, routine. 


ж 


ж CLASS routine DEFINITION 


* 


ж 


ж 


CLASS Ісі transform DEFINITION. 
PUBLIC SECTION. 


* — Attributs 
DATA: 


p. check master, data, exist 


TYPE rsodsocheckonly READ — ONLY, 


* —  [nstance for getting request runtime attributs ; 
* Available information: Refer to methods of 
* interfacé if rsbk request, admintab view 


pr. request 


ТҮРЕ REF TO if rsbk request admintab view READ - ONLY. 


PRIVATE SECTION. 


TYPE - POOLS; rsd, rstr. 


* Rule specific types 


TYPES; 
BEGIN OF ty s sc 1, 
* Field; /BIC/GOGSDM 公司 代码 . 
/ bic/gO0gsdm 
* Field; CALYEAR 日 历年 . 
calyear 
ж Field; /BIC/GOWL 物料 . 
/ bic/g0wl 
* Field; /BIC/KOXSSL 销售 数量 . 
/ bic/kOxssl 
ж Field: UNIT 计量 的 单位 . 
unit 
* Field; /BIC/KOXSJE 销售 金额 . 
/ bic/kOxsje 
* Field; CURRENCY 货 
currency 
ж Field: RECORD 记录 号 . 
record ТҮРЕ rsarecord , 


TYPE c LENGTH 8, 


TYPE n LENGTH 4, 


TYPE c LEN 


GTH 18, 


TYPE p LENGTH 9 DECIMALS 3, 


TYPE c LEN 


GTH 3, 


TYPE p LENGTH 9 DECIMALS 2, 


TYPE c LEN 


GTH 5, 
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ЕМ) ОҒ ty s sc 1. 


TYPES: 
ty t sc 1 TYPE STANDARD TABLE OF ty s sc 1 
WITH NON - UNIQUE DEFAULT KEY. 
*$*$ begin of global — insert your declaration only below this line ж-ж 


. "insert your code here 


*$*$ end of global — insert your declaration only before this line 六 一 六 
METHODS 
start_routine 

IMPORTING 
request TYPE rsrequest 
datapackid TYPE rsdatapid 

EXPORTING 
monitor TYPE rstr_ty_t_monitors 

CHANGING 
source_package TYPE _ty_t_sc_l 

RAISING 
cx_rsrout_abort. 

METHODS 
inverse_start_routine 

IMPORTING 
i_th_fields_outbound TYPE rstran_t_field_inv 
i_r_selset_outbound TYPE REF TO cl_rsmds_set 
i_is_main_selection TYPE rs_bool 
i_r_selset_outbound_complete TYPE REF TO cl_rsmds_set 
i_r_universe_inbound TYPE REF TO cl_rsmds_universe 

CHANGING 
c_th_fields_inbound TYPE rstran_t_field_inv 
c_r_selset_inbound TYPE REF TO cl_rsmds_set 
c. exact TYPE rs. bool. 

ENDCLASS. " routine DEFINITION 


*$:*$ begin of 2nd part global – insert your code only below this line ж 
. "insert your code here 


*$*$ end of 2nd part global — insert your code only before this line * 


* * 
* CLASS routine IMPLEMENTATION 

* * 
* 

* * 
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CLASS 1с] transform IMPLEMENTATION. 


* * 
* Method start, routine 

* * 
* Calculation of source package via start routine 

* * 
* <-> source package 

* * 


METHOD start, routine. 


* === Segments === 


FIELD -SYMBOLS : 
< source, fields > TYPE іу в sc 1. 


DATA: 
monitor rec TYPE rstmonitor. 
*$*$ begin of routine — insert your code only below this line 六 一 六 


. "insert your code here 
* —— fill table " MONITOR" with values of structure " MONITOR, REC" 
ж- to make monitor entries 
. "to cancel the update process 
ж raise exception type CX RSROUT ABORT. 
* CALL FUNCITON ZDBW KS DSO1 С01 
INCLUDE zdbw. incl. kslc. 


*$*$ end of routine — insert your code only before this line ж-ж 
ENDMETHOD. "start, routine 

* * 

* Method inverse. start, routine 

ж ж 

ж 

ж This subroutine needs to be implemented only for direct access 

* (for better performance) and for the Report/Report Interface 

* ( drill through). 

* The inverse routine should transform a projection and 

ж a selection for the target to a projection and а selection 

ж for the source, respectively. 

* If the implementation remains empty all fields are filled and 

* all values are selected. 

ж 
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ж ж 
ж 
ж ж 
METHOD inverse, start. routine. 
*$*$ begin of inverse routine — insert your code only below this line ж-ж 
. "insert your code here 
*$*$ end of inverse routine — insert your code only before this line ж-ж 
ENDMETHOD. " inverse, start, routine 
ENDCLASS. " routine IMPLEMENTATION 
集中 管理 后 的 结束 例 程 代码 如 下 。 
PROGRAM trans, routine. 
* * 
* CLASS routine DEFINITION 
* * 
ж 
ж ж 


CLASS 1с] transform DEFINITION. 
PUBLIC SECTION. 


* — Attributs 
DATA: 
p. check, master. data exist 


TYPE rsodsocheckonly READ — ONLY, 


* —  [nstance for getting request runtime attributs ; 
* Available information: Refer to methods of 
ж interfacé if rsbk request admintab view 


pr. request 


ТҮРЕ REF TO if rsbk request admintab view READ - ONLY. 


PRIVATE SECTION. 


TYPE - POOLS; rsd, rstr. 


* Rule specific types 


TYPES: 
BEGIN OF ty s tg 1, 
* InfoObject: GOGSDM 公司 代码 . 
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/ bic/g0gsdm ТҮРЕ /bic/oigOgsdm , 
* InfoObject: OCALYEAR 日 历年 . 


calyear TYPE /bi0/oicalyear, 
ж InfoObject; KOXSSL 销售 数量 . 

/ bic/kOxssl TYPE /bic/oikOxssl , 
* InfoObjeet; KOXSJE 销售 金额 . 

/ bic/ kOxsje TYPE /bic/oikOxsje , 
* InfoObject; OUNIT 计量 的 单位 . 

Unit TYPE /bi0/ oiunit , 
* InfoObject: OCURRENCY 货币 名 称 代 码 . 

сштепсу TYPE /Һ0/оісштепсу, 
ж InfoObject; KOXSJG 销售 价格 . 

/ bic/ kOxsjg TYPE /bic/oikOxsjg , 
* InfoObject: OLOGSYS 源 系 统 . 

logsys ТҮРЕ rsdlogsys, 
* InfoObject: GOWL 物料 . 

/ bic/g0wl TYPE /bic/oig0wl , 
ж InfoObject: GOWLZ 物料 组 . 

/bic/g0wlz TYPE /bic/oigOwlz, 
ж Field: RECORD. 

record ТҮРЕ rsarecord , 

END ОҒ ty s tg 1. 
TYPES: 
_ty t tg 1 TYPE STANDARD TABLE OF ty s tg 1 


WITH NON - UNIQUE DEFAULT KEY. 


*$*$ begin of global — insert your declaration only below this line 
. "insert your code here 
*$*$ end of global — insert your declaration only before this line 
METHODS 
end. routine 
IMPORTING 
request TYPE rsrequest 
datapackid TYPE rsdatapid 
EXPORTING 
monitor TYPE rstr ty t monitors 
CHANGING 
result package TYPE ty t tg 1 
RAISING 
cx rsrout. abort. 
METHODS 


inverse end routine 
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IMPORTING 


i th, fields outbound TYPE rstran, t. field, inv 
i г selset, outbound TYPE REF TO cl, rsmds. set 
i is main, selection TYPE rs, bool 
i r selset. outbound, complete ТҮРЕ REF TO сі rsmds set 
i г universe. inbound TYPE REF TO сі rsmds universe 
CHANGING 
c th. fields inbound TYPE rstran. 1 field. inv 
c. r selset. inbound TYPE REF TO cl rsmds. set 
с. exact ТҮРЕ rs. bool. 
ENDCLASS. " routine DEFINITION 


*$*$ begin of 2nd part global — insert your code only below this line ж 
. "insert your code here 


*$*$ end of 2nd part global — insert your code only before this line — * 


* * 
* CLASS routine IMPLEMENTATION 

* * 
* 

* * 


CLASS Ісі transform IMPLEMENTATION. 


* * 
* Method end, routine 

* * 
* Calculation of result package via end routine 

* Note: All not overwritten field values within the routine 

ж аге transferred from the corresponding source fields. This 

* means, all fields not supplied by the transformation source 

ж are send with initial values to the transformation target. 

* * 


* <-> result package 


METHOD end, routine. 


Ж === Segments === 


FIELD -SYMBOLS : 
« result, fields > TYPE ty. s tg 1. 


DATA: 


monitor rec TYPE rstmonitor. 


251 


*$*$ begin of routine - insert your code only below this line ж-ж 
. "insert your code here 
* —— fill table " MONITOR" with values of structure " MONITOR, REC" 
* — to make monitor entries 
. "to cancel the update process 
* raise exception type CX RSROUT ABORT. 
* CALL FUNCITON ZDBW JS DS01. C01 
INCLUDE zdbw. incl jslc. 


*$*$ end of routine — insert your code only before this line ж-ж 
ENDMETHOD. "end routine 

* * 

* Method inverse. end. routine 

* * 

* 

ж This subroutine needs to be implemented only for direct access 

* (for better performance) and for the Report/Report Interface 

* ( drill through). 

* The inverse routine should transform a projection and 

ж a selection for the target to a projection and a selection 

ж for the source, respectively. 

* If the implementation remains empty all fields are filled and 

* all values are selected. 

* 

* * 

* 

* * 


METHOD inverse, end, routine. 


*$*$ begin of inverse routine — insert your code only below this line ж-ж 


. "insert your code here 


*$*$ end of inverse routine — insert your code only before this line ж-ж 
ENDMETHOD. "inverse end routine 
ENDCLASS. " routine IMPLEMENTATION 


5.7.6 大 型 项 目 例 程 管控 小 结 


为 了 更 加 可 控 地 管理 大 型 或 超大 型 项 目的 开发 和 后 期 运行 维护 ， 必 须 在 以 下 几 个 方面 做 
好 计划 和 协调 : 
1) 所 有 的 例 程 都 必须 在 开始 例 程 和 结束 例 程 中 编写 ， 不 允许 使 用 特性 例 程 和 关键 指标 
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例 程 。 

2) 所 有 的 开始 例 程 和 结束 例 程 均 不 允许 直接 在 转换 中 编写 ， 必 须 在 配置 表 中 集中 配置 
后 ,集中 调用 ， 在 开始 和 结束 例 程 中 只 允许 使 用 指定 的 INCLUDE 函数 。 

3) 对 函数 的 命名 必须 进行 规范 管理 ， 例 如 上 述 示 例 ， 函 数组 名 称 为 ZDBW_KS_01 ( 因 
为 一 个 函数 组 最 多 只 允许 有 99 个 函数 ， 因 此 不 建议 使 用 ZDBW_KS， 而 是 后 续 加 上 编号 )， 
则 函数 名 称 为 ZDBW_KS/JS_ < Ж >_< Н>. 

4) 为 了 保证 函数 和 结构 的 一 致 性 不 出 现 问题 ， 建 议 在 程序 中 最 大 限度 地 使 用 指针 。 在 
对 指针 进行 操作 前 ， 要 先 判断 指针 是 否 被 赋值 ， 而 不 是 直接 以 指定 字段 名 的 方式 进行 函数 的 
编写 。 
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第 6 章 数据 仓库 对 象 管理 中 的 功能 增强 


6.1 对 信息 块 的 数据 访问 


6.1.1 应 用 场景 描述 


为 了 向 用 户 演示 BW 系统 的 各 项 功能 ， 我 们 会 新 建 数据 存储 对 象 DSO 和 信息 块 等 实际 
存储 数据 的 对 象 ， 但 是 新 建 完毕 后 ， 通 常 需要 向 这 些 对 象 中 输入 一 些 模拟 数据 ， 或 从 这 些 对 
象 中 将 数据 提取 出 来 进行 数据 交换 。 对 于 数据 存储 对 象 而 言 ， 这 项 工作 显得 相对 容易 ， 因 为 
其 实际 存储 数据 的 表 是 二 维 结构 ， 这 和 我 们 通常 所 处 理 的 二 维 结构 透明 表 没 有 太 大 差别 。 但 
是 对 于 信息 块 而 言 ， 由 于 其 使 用 了 扩展 的 星 形 结构 ， 需 要 处 理 的 表 太 多 ， 因 此 不 能 使 用 传统 
的 方式 对 其 进行 存 取 。 


6.1.2 向 信息 块 中 随机 增加 测试 数据 


很 多 时 候 ， 我 们 需要 上 载 测 试 数据 到 信息 块 中 ， 以 对 信息 块 或 基于 信息 块 的 多 信息 提供 
者 ， 其 至 是 查询 进行 即时 的 测试 。 一 般 的 方法 是 临时 新 建 数据 源 ， 制 作 与 数据 源 结构 对 应 
的 CSV 文件 ， 然 后 连接 数据 源 和 目标 信息 块 ， 新 建 对 应 的 转换 和 DTP， 当 所 有 模型 搭建 
完毕 后 ， 运 行 信息 包 ， 将 数据 加 载 到 数据 源 ， 然 后 再 运行 DTP， 将 数据 从 数据 源 加 载 到 
言 息 块 。 以 上 过 程 不 仅 浪费 时 间 ， 而 且 不 灵活 的 地 方 在 于 ， 每 次 都 需要 根据 不 同 的 信息 
块 结 构 去 创建 不 同 的 数据 源 和 模型 ， 因 此 我 们 有 必要 通过 统一 的 程序 使 系统 自动 产生 一 
些 数据 以 供 测 试 。 

下 面 将 使 用 程序 针对 信息 块 SNOC01 进行 测试 数据 的 自动 填充 。 需 要 注意 的 是 ， 由 于 
我 们 采用 的 是 ВЕС 的 方式 将 数据 包 写 入， 类 似 BPS 的 数据 处 理 方式 ， 因 此 写 入 的 请 求 需要 
进行 手工 状态 设置 ， 也 就 是 将 请 求人 从“ 黄色” 改 为 “绿色 ”。 男 外 ， 由 于 产生 的 数据 会 以 当 
前 系统 登录 语言 ( 如 中 文 和 英文 等 ) 写 人 到 信息 块 的 特性 中 ， 因 此 建议 在 合适 的 语言 环境 
下 进行 ， 和 否则 可 能 出 现 系统 执行 错误 。 

示例 向 信息 提供 者 SINOC01 填充 测 斌 数据， 代码 如 下 。 


REPORT z_cube_generate_test_data. 


TYPE - POOLS : rsd ,rssb ,Tssg ,Ts. 
TABLES : rsdcube. 


FIELD -SYMBOLS : «g t data» TYPE STANDARD TABLE. 
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DATA : | infocube ТҮРЕ rsinfocube, 
] xstr TYPE xstring, 
1. samplesize TYPE i, 
i modus TYPE 1, 
1 s cube ТҮРЕ rsd, s cube, 
g ref to data TYPE REF TO data, 
1 code TYPE аһарвошсе, 
1 repid LIKE sy – тері, 
cube. ausgabe TYPE rsd, infocube, 
1 t code TYPE STANDARD TABLE OF abapsource WITH DEFAULT KEY, 
1 tabinm TYPE rsd_tablnm ， 
i rfcdest TYPE rfcdest , 


w. answer TYPE c. 


DATA : it cube TYPE STANDARD TABLE OF rsdcube. 


ж ж 
* 选择 屏幕 
ж ж 


SELECTION - SCREEN BEGIN OF BLOCK bl WITH FRAME TITLE text - 101. 
PARAMETERS : р infoc TYPE rsdcube — infocube VALUE CHECK , 

p.size TYPE i DEFAULT 10. 
SELECTION - SCREEN END OF BLOCK bl. 


AT SELECTION - SCREEN ON p_infoc. 
SELECT infocube 
FROM rsdcube 
INTO TABLE it, cube. 


IF sy - subrc -0. 


CALL FUNCTION POPUP ТО. CONFIRM 


EXPORTING 
titlebar = 消息 ' 
text_question = 您 真 的 需要 上 和 载 一 些 测试 数据 么 ' 
text_button_1 = YES (001) 


icon button 1 = ICON ALLOW 

text. button, 2 = NO (002) 

icon button 2 = ICON REJECT 
IMPORTING 


answer —w answer 
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EXCEPTIONS 


text, not, found ES! 

OTHERS 22 
IF sy -subre < > 0. 
ENDIF. 


CLEAR : 1 samplesize. 
IF w answert 1. 
MOVE p. infoc TO 1 infocube. 
MOVE p. size TO 1 samplesize. 
ENDIF. 


IF w. answer = 2 OR м. answer = А. 
CLEAR: p infoc , p. size , l infocube , 1 samplesize. 
ENDIF. 
ELSEIF sy -subre < > 0. 
MESSAGE ID BRAIN TYPE I NUMBER 330 WITH р infoc. 
ENDIF. 


ж 
* 获取 信息 块 数据 字典 信息 
ж 


CALL FUNCTION RSD CUBE GET 


EXPORTING 
1 infocube = 1 infocube 
IMPORTING 
e. s cube -] s cube 
EXCEPTIONS 
infocube. not, found ES! 
illegal input -2 
OTHERS -4. 
ж 
* 权限 检查 
ж 


CALL FUNCTION RSSB AUTHORITY ADMWB INFOCUBE 


EXPORTING 

i actvt = rssb, с auth, actvt — delete 

i infocube = 1 infocube 

i icubeobj = rssb. с. auth, icubeobj — data 
EXCEPTIONS 

user not, authorized ES! 
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ж 


ж 


OTHERS E 
IF sy - subre < > 0. 
MESSAGE ID sy — msgid TYPE sy — msgty NUMBER sy – msgno 


WITH sy — msgvl sy - msgv2 sy — msgv3 sy - msgv4. 
ENDIF. 


产生 数据 


l_tablnm =1_s_cube – viewtiobjnm2. 

PERFORM get. report. name CHANGING 1 repid. 

CONCATENATE REPORT 1 repid . INTO 1 code SEPARATED BY space. 
APPEND 1. code TO ] t. code. 


CONCATENATE TYPES: L S DATA ТҮРЕ 1 tablnni ', INTO 1 code SEPARATED BY space. 


APPEND 1. code TO 1 t. code. 


APPEND L T DATA TYPE STANDARD TABLE OF L S DATA TO 1 t code. 
APPEND WITH DEFAULT KEY. "ТО l t code. 
APPEND FORM CREATE TABLE TYPES "ТО l t code. 


APPEND CHANGING E REF TO CHAVLTAB TYPE REF TO DATA. ' TO 1 t code. 
APPEND CREATE DATA E REF TO CHAVLTAB TYPE L Т РАТА. TO I t code. 
APPEND ENDFORM. ' TO I t code. 


INSERT REPORT І repid FROM 1. t. code. 

PERFORM create table types IN PROGRAM(] repid) 
CHANGING g ref to data. 

A 取 列 抬头 


о 


ASSIGN g ref to data -» * TO «g t data». 
DELETE REPORT І repid. 


CLEAR 1. t. code. 


产生 随机 的 特性 和 关键 指标 
CALL FUNCTION RSSAMPLE_CUBE_SAMPLE_CREATE 


EXPORTING 
1 infocube -1 infocube 
i samplesize -] samplesize 
i use masterdata = Х 
i random, seed -0 
i modus -3 
I DATES CLOSE -RS C FALSE 
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IMPORTING 


e t. data - «g t data» 
EXCEPTIONS 

illegal input =1 

inherited_error = 2 

OTHERS =3 


* ”通过 КЕС 发 送 数据 包 
EXPORT rsdri = «g 1 data» ТО DATA BUFFER 1, xstr COMPRESSION ОМ. 
FREE «g t data». 
DATA : i t rfedata TYPE rsdri t. rfcdata. 
* ”调用 系统 标准 АРІ 写 人 数据 
CALL FUNCTION RSDRI CUBE WRITE PACKAGE RFC 
DESTINATION i rfcdest 


EXPORTING 
i infocube -] infocube 
i curr conversion = 
i rfcdata, uc -] xstr 
TABLES 
1 t rfedata =1 t rfcdata 
EXCEPTIONS 
іпіосиһе not found ES! 
illegal input -2 
rollback, error =3 
generation error -4 
duplicate, records =5 
request_locked =6 
not_transactional = 7 
x message =8 
OTHERS -9. 
ж бс 
*& Form GET REPORT NAME 
*& 
ж text 
* 
* «--P L КЕРШ text 
* 


FORM get. report пате CHANGING 1 repid LIKE sy — repid. 


DATA : 1 uniqueid TYPE rssg uni, idc25. 
CALL FUNCTION RSS SYSTEM, СЕТ UNIQUE ID 
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IMPORTING 


e uni idc25 -1 uniqueid. 


CONCATENATE СР 1 uniqueid INTO 1 repid 
ENDFORM. 


" GET REPORT NAME 
执行 以 上 程序 ， 输 入 信息 块 SINOC01 以 及 要 产生 的 数据 量 10 
所 示 。 


条 ,输入 界面 如 图 6-1 


Program Edit Goto System Help 


ë ^ à aeaa 


Dg aA 23 $9 45 
Z CUBE GENERATE TEST. DATA 


[eT 


м Ето 


Piro | шо:  ) 
P. SIZE =s 
图 6-1 程序 运行 条 件 输入 界面 


执行 程序 ， 系 统 弹出 确认 对 话 框 ， 如 图 6-2 所 示 。 


图 6-2 系统 消息 提示 界面 


单 击 “YES” 按 钮 ， 系 统 会 向 信息 块 SINOC01 中 写 入 10 条 数据 ， 此 时 能 够 看 到 在 信息 


ЕЗ 
块 中 会 出 现 一 条 状态 为 “黄色 ”的 请 求 ， 只 有 当 数 据 满 50000 条 时 ， 系 统 才 会 关闭 该 请 求 ， 
但 是 可 以 人 为 关闭 该 请 求 ， 手 工 设置 其 状态 为 绿色 即 可 ， 如 图 6-3 所 示 。 


-一 


| [кешер |Ее |со [co, |a, [Rol Rea, |Load [DTP/InfoPackage — |RequestDate [update Date |Transferred R | Added Recor | 


АҒ2012. 08. 08 


2012. 08. 08 10 
2012. 08. 03 10 
2012. 08. 03 40 


-» 2012. 08. 03 


图 6-3 信息 块 请 求 管理 界面 
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通过 信息 块 数据 查看 功能 ， 可 以 看 到 系统 自动 生成 的 数据 如 图 6-4 所 示 。 


= 


Lit Edit Goto Views Settings System Help 


"SINOCO1', List output 


@ зКчатесеаеш иа ЫК к а oum 


КЕТЕ |] ei RE) nj ln] | 68 5] 3 | EN] 


0LOGSYs| G0GSDM[ GOWL | GOWL. I F| Request ID OCALMONTH ОСАҮЕА | currency] QUNIT| K0XS3E | K0XSJG | KoxssL | 


6.1.3 读 取信 息 块 的 
BW 在 系统 层面 提供 


我 们 可 能 也 需要 通过 ABAP 的 方式 来 获取 信息 提供 


数据 


532 637 |693 |610 APO RDDEWLA3KISHABOSHJ93YGH1DQ 201212 2012|EUR 5Т | 1.00 |250.00 | 580 
S23 |681 |687 |699 | |APO RDDEWL43KISHABOSHJ93YGH1DQ 201102 2011 [EUR [sT | 1.00 |420.00 | 670 
[s73 |684 |669 |687 | | |APO RDDEWL43KISHABOSHJO3YGHIDQ | 200911 2009 EUR ST 1.00 (970.00 | 900 | 
S95 |613 |681 |699 | |APO RDDEWL43KISHABOSHJ93YGH1DQ 201207 20112 EUR (ST | 1.00 |930.00 | 180 
S61 [654 |645 |622 | |APO RDDEWL43KISHABOSHJO3YGHIDQ | 201209] 2012 EUR |57 | 1.00 |240.00 | 350 
587 681 689 |635 APO RDDEWLA43KISHABOSHJ93YGH1DQ 201104 2011 EUR ST 1.00 |870.00 | 590 
S18 G92 671 |641 | | |APO_RDDEWL43KISHAB0SHJ93YGH1DQ 201210 2012 EUR |57 | 1.00 |240.00 | 910 
593 605 |637 |628 | | APO, RDDEWL43KISHABOSHJO3YGH1DQ 200804 2008|EUR |57 | 1.00 610.00 | 820 
534 GO |623 |699 APO. RDDEWLA3KISHABOSHJ93YGH1DQ 201208 2012 EUR ST 1.00 |470.00 | 620 
S09 |645 |696 |607 || |APO RDDEWL43KISHABOSHJ93YGH1DQ 201111 2011 | EUR ST | 1.00 |960.00 | 430 
图 6-4 生成 数据 查看 界面 


了 Open Hub 和 МОХ 等 标准 功能 来 对 外 输出 数据 ， 但 是 在 很 多 时 候 


容 。3 种 不 同类 型 的 数据 输出 方式 的 对 比 见 表 6-1。 
%6-1 3 种 不 同 输出 方式 的 比较 


者 的 值 ， 如 读 取 多 信息 块 或 信息 块 的 内 


接口 方式 输出 对 象 适用 场景 
Open Hub CSV 文件 或 数据 库 表 ; BW 向 其 他 数据 仓库 产品 输出 大 量 数据 时 
MDX QUERY 值 结果 或 封装 为 RFC E s ке, 号 到 的 数 
АВАР 直接 读 取 АВАР 内 表 或 数据 库 表 конны BW 数据 的 


下 面 将 通过 代码 读 取 SINOC01 信息 块 中 2010 年 的 数据 ， 代 码 如 下 。 


*& 


*& 


ж 
ж & Report Z_RSDRI INFOPROV. READ 
ж & 通过 程序 读 取 SINOC01 信息 块 中 的 数据 

ж 


REPORT ¿z rsdri | 
TYPE - POOLS; rs 


* TYPES: 

ж — BEGIN OF et : 
* chngid 

* recordtp 

* requid 

* calyear 


infoprov. read. 


, rsdrc. 


s, data, 
TYPE /biO/oichngid , "更 改 ID 
TYPE /bi0/oirecordtp , "记录 类 型 
TYPE /biO/oirequid ， "请 求 标识 
TYPE /biO/oicalyear, " 日 历年 
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ж calmonth TYPE /bi0/oicalmonth , "日 历年 月 


ж gOgsdm TYPE /bic/oig0gsdm , "公司 代码 

ж logsys TYPE /bi0/oilogsys , " 源 逻 辑 系统 
ж gOwl TYPE /bic/oigOwl , "物料 

ж gOwlz TYPE /bic/oigOwlz , "物料 组 

ж unit TYPE /bi0/ oiunit, "单位 

ж сштепсу ТҮРЕ /Һ0/оісштепсу, "ФП 

* kOxssl TYPE / bic/oikOxssl , "销售 量 

ж kOxsjg TYPE /bic/oikOxsjg , "销售 价格 

ж kOxsje TYPE /bic/oikOxsje , "销售 额 

ж 


* END OF gt s data. 


DATA: g s data TYPE /bic/vsinoc012 , 
g t. data TYPE STANDARD TABLE OF /bic/vsinoc012 , 


ж G S 5ЕС = description of a characteristic or navigational attribute 
* that is requested by a query 
g s sfc TYPE rsdri s sfc, 
g th. sfc TYPE rsdri, th, кіс, 
ж G S 5ЕК = description of a key figure that is requested by a query 
g s sfk TYPE rsdri, s. sfk, 
g th sfk TYPE rsdri. th. sfk, 
ж G S RANGE = description of a restriction on a characteristic or 
* navigational attribute 
g s range TYPE rsdri s range, 
g t range TYPE rsdri. t. range. 
* CHARACTERISTIC HANDLING * 
* * 


* For the following characteristics/navigational attributes values 


* should be returned ; 


* logsys TYPE /biO/oilogsys , "逻辑 系统 
ж pOgsdm TYPE /bic/oipO0gsdm, "公司 代码 
ж g0wl TYPE /bic/oigOwl , "物料 

ж gOwlz TYPE /bic/oigOwlz , "物料 组 

ж chngid TYPE /biO/oichngid , "更 改 ID 

ж recordtp TYPE /biO/oirecordtp , "记录 类 型 
ж гедша TYPE /biO/oirequid , "请 求 标识 
ж calmonth TYPE /biO0/oicalmonth , "HE 

ж calyear TYPE /biO/oicalyear, " 日 历年 

* unit TYPE /biO/oiunit , "单位 

ж сштепсу TYPE /Һ0/оісштепсу, "货币 
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CLEAR g th, кіс. 
жж жж R R RR k OLOGSYS k k k k k k k k k k k k k k kk k k kk kk 
ж OLOGSYS 
CLEAR g_s_sfc. 
ж – – – пате of characteristic 
g s Біс- chanm = 0LOGSYS. 
ж – – – name of corresponding column іп G T DATA 
g s sfc — chaalias = 0LOGSYS. 
ж ——— no ORDER - BY 
g s sfc — orderby -0. 
ж ——- include into list of characteristics 
INSERT о s sfc INTO TABLE g th, sfc. 


жж жж жа k k k k k k СОСЅЮМ жәие жж к k 


ж GOGSDM 

CLEAR о s Біс. 

ж – – – пате of characteristic 

6 в Біс- chanm = GOGSDM. 

ж – – – name of corresponding column in G T DATA 
g s sfc — chaalias = GOGSDM. 

ж ——— no ORDER - BY 

g s sfc — orderby -0. 

ж ——- include into list of characteristics 


INSERT о s sfc INTO TABLE g th, sfc. 
ЖЖЖ кк жак жекен GO W L 六 六 六 六 六 六 六 六 六 六 六 六 六 六 六 六 六 六 玉米 六 六 
* GOWL 

CLEAR g_s_sfc. 


ж ——— name of characteristic 

g s Біс- chanm = GOWL. 

ж – – – name of corresponding column in G T DATA 
g s sfc — сһааһаѕ = GOWL. 

ж ——— no ORDER - BY 

g s sfc — orderby -0. 

ж ——— include into list of characteristics 


INSERT о s sfc INTO TABLE g th, sfc. 


жЕ СОМ, жо о ЕЕЕ ЖЖ 


ж GOWLZ 

CLEAR о s віс. 

ж – – – пате of characteristic 

6 в Біс- chanm + GOWIZ . 

ж ---паше of corresponding column іп G T DATA 
g s sfc — сһааһаѕ + GOWIA. 


ж ——— по ORDER - BY 
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5 s Біс- orderby -0. 

ж ——-— include into list of characteristics 
INSERT g s sfc INTO TABLE о th, е. 

ж ЖЕЕ ЕЕ ООСНМъ№СІЮ =» о о 
ж OCHNGID 

CLEAR о s Біс. 


ж – – – name of characteristic 

g s Біс- chanm = 0OCHNGID . 

ж – – – name of corresponding column in G T DATA 
g s sfc — chaalias = OCHNGID . 

ж ——— no ORDER - BY 

g s sfc — orderby -0. 

ж ——- include into list of characteristics 


INSERT g s sfc INTO TABLE g th, sfc. 

жж жж жж жж ЖОВЕСОВПТР жж жж жоко о о 
ж ORECORDTP 

CLEAR о s Біс. 


ж – – – name of characteristic 

g s Біс- chanm = ORECORDTP . 

ж ——- name of corresponding column in G T DATA 
g s sfc — chaalias = ORECORDTP . 

ж – – – no ORDER - BY 

g s sfc — orderby -0. 

ж —-—-— include into list of characteristics 


INSERT о s sfc INTO TABLE о th, е. 


жж жок жк Жк ЖЖЖ жж ЖоК ЖЖ ЖЖ 0REQUID жж 2 


ж OREQUID 

CLEAR о s Біс. 

ж ——— name of characteristic 

g s Біс- chanm = OREQUID . 

ж – – – name of corresponding column in G T DATA 
g в sfc — chaalias = OREQUID . 

ж ——— no ORDER - BY 

g s sfc — orderby -0. 

ж ——- include into list of characteristics 


INSERT о s sfc INTO TABLE о th, sfc. 

о жж ОСАТМОМТН х х жж ж 3k k 3k 3k 3k 3k 3k оок 
ж OCALMONTH 

CLEAR о s. Біс. 


ж – – – пате of characteristic 
g s Біс- chanm + ОСАІМОМТН . 
ж – – – name of corresponding column іп G T DATA 


263 


5 s sfc - chaalias = OCALMONTH . 

ж ——— no ORDER - BY 
g s sfc -orderby -0. 

ж ——- include into list of characteristics 
INSERT о s sfc INTO TABLE g th, sfc. 

жж жж ОСАТУЕАВ %2 kk kkk жооок жж 
ж OCALYEAR 

CLEAR о s Біс. 


ж – – – name of characteristic 

6 в Біс- chanm = OCALYEAR . 

ж – – – name of corresponding column in G T DATA 
g s sfc — сһааһаѕ = OCALYEAR . 

ж ——— no ORDER - BY 

g s sfc — orderby -0. 

ж ——- include into list of characteristics 


INSERT о s sfc INTO TABLE g th, sfc. 
ЖЖЖ ЖЕЕ (О) ОМТ ооо о жн жен 
ж OUNIT 

CLEAR о s Біс. 


ж – – – name of characteristic 

6 в Біс- chanm = 0UNIT . 

ж – – – папе of corresponding column іп G T DATA 
в s sfc — chaalias = QUNIT . 

ж ——— no ORDER - BY 

g s sfc — orderby EIU 

ж ——-— include into list of characteristics 


INSERT о s sfc INTO TABLE g th, sfc. 
жЕ ЕЕЕ ОСОВВЕМСҮ «жж жж к 
ж OCURRENCY 

CLEAR g s віс. 


ж ——— name of characteristic 

g s Біс- chanm = QCURRENCY . 

ж – – – name of corresponding column in G T DATA 

g s sfc — chaalias = QOCURRENCY . 

ж – – – no ORDER - BY 

g s sfc — orderby -0. 

ж ——- include into list of characteristics 

INSERT о s sfc INTO TABLE g th, sfc. 

* KEY FIGURE HANDLING * 
* * 


* For the following key figures should be returned: 
* kOxssl TYPE / bic/oikOxssl , "销售 数量 


| 


(8 
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* kOxsjg TYPE /bic/oikOxsjg , "销售 价格 

ж kOxsje TYPE /bic/oikOxsje , "销售 金额 

CLEAR о th. sfk. 

жона ЖЕ ЖЕКЕ КОХ], яки жа жона аж 


ж KOXSSL 


CLEAR о s. sfk. 

ж – – – name of key figure 

g s sfk — kyfnm = KOXSSL. 

ж – – – name of corresponding column in G T DATA 
g s sfk — kyfalias = KOXSSL . 

ж --- aggregation 

g s sfk — aggr = SUM. 

ж ——- include into list of key figures 


INSERT g s sfk INTO TABLE g th, sfk. 

ЖЕЖ ЖЖЖ ЖЖЖ ЖЖЖ Жж жж жж k kok k k KO XSJG *E * s s kk ж жж ж жж жж еже ж 
ж KOXSJG 

CLEAR g s. sfk. 


ж – – – name of key figure 

g s sfk — kyfnm = KOXSJG . 

ж – – – name of corresponding column in G T DATA 
g s sfk — kyfalias = KOXSJG . 

ж --- aggregation 

5 s sfk — aggr = АУС. 

ж – – – include into list of key figures 


INSERT g s sfk INTO TABLE g th, sfk. 

ЖЖЖ ЖЕ ЖЖЖ ЖЖЖ Жж 9k R R k k k k k k ҚОХӘТЕ жжжж жж же ж ж жж ж же жжж 
ж KOXSJE 

CLEAR g s sfk. 


ж – – – name of key figure 

g s sfk — kyfnm = KOXSJE . 

ж – – – name of corresponding column іп G T DATA 

g s sfk — kyfalias = KOXSJE . 

ж --- aggregation 

5 s sfk — aggr = SUM. 

ж – – – include into list of key figures 

INSERT g s sfk INTO TABLE g th sfk. 

* RESTRICTION ON CALYEAR —-—---------- 
ж 


ж These are the restrictions: 
* OCALYEAR EQ 2010 
CLEAR g t range. 

* OCALYEAR EQ 2010 
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CLEAR g s range. 


ж – – – name of the characteristic 

g s range — chanm = OCALYEAR . 

ж ——- including or excluding condition ? 

g s range — sign шів c range sign — including. 
ж – – – comparison operator 

g s range — compop -rs c range opt — equal. 

ж – – – low value 

g s range — low + 2010. 

ж ——-— include into list of restrictions 


APPEND g s range TO g t range. 


* reading module is called 


* 


DATA: g end of data ТҮРЕ rs bool, 
g first. call TYPE rs, bool. 


ж ——- this variable will be set to TRUE when the last data 
* package is read 


g end of data = гѕ_ с false. 


ж --- this variable indicates whether this is an initial 

ж call to the reading module or a follow — up call ( which 
* simply retrieves already selected data) 

g first сай —rs c true. 


WHILE g end, of data = rs с. false. 


CALL FUNCTION RSDRI INFOPROV. READ 
EXPORTING 


i infoprov = SINOCOI 

i th, sfc -g th sfc 

i th, sfk -g th sfk 

1 t range = 0 t range 

i reference date = ѕу – datum 

i save іп table = 15 c false 

i save in file —rs c false 

i packagesize - 1000 

i authority. check = rsdre, с authchk – read 
IMPORTING 

e t data -g t data 

e end, of data -g end of data 
CHANGING 


266 


c. first. call = р first. call 


EXCEPTIONS 


illegal input =1 
illegal input, sfc -2 
illegal input sfk =з 
illegal input range -4 
illegal input tablesel -5 
no, authorization =6 
illegal. download =8 
illegal tablename =9 
OTHERS -11. 


IF sy - subre < > 0. 
BREAK - POINT. 
EXIT. 
ENDIF. 
* for the sake of the example: print returned data 
PERFORM print, result. 


"SEC NOBREAK 


ENDWHILE. 
* * 
* FORM print result 
* * 
* 
* * 


FORM print result. 


LOOP AT g t data INTO g s data. 
WRITE :/g s data —Ologsys, 
g s data — gOgsdm, 
g s data — gOwl, 
g s data — gÜwlz, 
g s data – Ocalmonth, 
g s data —Ocalyear, 
g s data — kOxssl,, 
g s data — Ounit, 
g s data — kOxsjg, 
g s data — kOxsje, 
6 s data – Осштепсу. 


ENDLOOP. 


ENDFORM. " print, result 
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程序 运行 后 ， 读 取 到 了 信息 块 SINOC01 中 的 数据 ， 具 体 显示 界面 如 图 6-5 所 示 。 


[eg 
Lit Edit Goto System Help 
š d ÇO D MI тїз Оо 


PC_FILE 2000 2345609876 23 2010.12 2010 0.390 TON 0.00 55.53 CNY 
PC_FILE 1000 67898765678 67 2010.12 2010 9.770 TON 0.00 47.37 CNY 
PC_FILE 1000 2345609876 23 2010.12 2010 3.330 TON 0.00 67.92 CNY 
PC_FILE 2000 67898765678 67 2010.12 2010 9.840 TON 0.00 69.20 CNY 


图 6-5 数据 显示 界面 


从 上 面 的 示例 中 可 以 看 到 ， 实 际 上 ， 无 论 是 多 信息 提供 者 ， 还 是 信息 块 等 多 维 的 数据 模型 
的 数据 ， 依 然 可 以 在 使 用 АВАР 代码 封装 为 标准 的 ВЕС 函数 后 ， 供 外 部 系统 在 线 实时 调用 。 


6.1.4 单元 小 结 


对 于 信息 块 的 数据 存 取 ， 虽 然 大 多 数 时 候 并 不 是 通过 程序 的 方式 来 进行 ， 但 是 在 少数 情 
况 下 ， 直 接 的 数据 存 取 还 是 有 其 必要 性 的 ， 特 别 是 对 于 数据 的 读 取 ， 很 多 时 候 我 们 可 能 使 用 
Open Hub 或 MDX 的 方式 进行 ， 但 都 有 其 弱点 。 使 用 Open Hub 方式 很 多 时 候 不 能 获得 信息 
块 数据 的 当前 视图 ， 而 使 用 МОХ 方式， 需要 先 新 建 Query (也 可 以 直接 基于 Cube)， 然 后 
编写 MDX 语句 ， 最 后 将 МОХ 语句 封装 为 可 供 外 部 调用 的 RFC， 这 个 过 程 显 得 有 些 迟 组 ， 
因此 直接 使 用 ABAP 语言 来 读 取 数 据 不 失 为 一 种 好 的 接口 选择 。 


6.2 虚拟 信息 块 


6.2.1 应 用 场景 描述 


现 有 产品 的 销售 价格 ， 根 据 国际 市 场 的 行情 ， 每 隔 一 段 时 间 就 需要 进行 调整 ， 用 户 要 
求 ， 在 最 终 展 示 时 ， 系 统 要 根据 历史 数据 ， 自 动 找 到 上 次 的 价格 ,调整 日 期 以 及 上 次 的 销售 
价格 ， 并 且 数 据 需要 实时 展现 。 由 于 标准 信息 块 无 法 满足 这 样 的 需求 ， 因 此 需要 使 用 基于 功 
能 模块 的 虚拟 信息 块 。 


6.2.2 虚拟 信息 提供 者 的 实施 


定义 SAP 信息 块 时 ， 系 统 会 让 用 户 选 择 信息 块 的 类 型 ， 一般 用 到 的 都 是 标准 类 型 的 信 
息 块 ， 但 是 还 有 其 他 几 种 类 型 的 信息 块 也 能 为 最 终 的 查询 提供 数据 。 此 类 信息 块 本 身 并 不 存 
储 数据 ， 而 是 临时 根据 一 定 的 逻辑 去 相关 的 源 系 统 或 BW 系统 自身 的 存储 中 寻找 数据 ， 再 根 
据 用 户 指定 的 逻辑 进行 运算 ， 并 最 终 将 清洗 后 的 数据 提供 给 查询 使 用 ， 这 类 信息 块 称 为 虚拟 
言 息 块 或 实时 信息 块 。 

由 于 实时 信息 块 的 使 用 范围 有 限 ， 而 且 实 施 起 来 又 相对 复杂 ， 因 此 在 项 目 中 并 不 常见 ， 
所 以 本 节 主 要 讲解 “基于 功能 模块 ”的 虚拟 信息 块 。 

定义 基于 功能 模块 的 虚拟 信息 块 时 ， 最 为 重要 的 数据 处 理 都 是 在 功能 模块 中 进行 的 ， 下 
面 将 在 功能 模块 中 定义 需要 的 功能 模块 ， 如 图 6-6 所 示 ， 并 在 SE37 功能 函数 编辑 工具 中 对 
功能 模块 进行 编写 。 
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16-6 虚拟 信息 块 的 定义 
实际 上 ， 除 了 标准 的 功能 模块 需要 填写 外 ， 还 有 一 些 选 择 选 项 供 开 发 人 员 输入 ， 其 中 最 
重要 的 两 个 参数 是 “打包 RFC” 和 “SID 支持 ”， 因 为 这 两 个 参数 的 设置 对 函数 的 参数 有 至 
关 重 要 的 影响 。 


图 6-7 带 有 功能 模块 的 信息 块 的 属性 定义 


第 一 种 情况 ， 当 勾 选 “打包 RFC” 复 选 框 时 ， 系 统 的 参数 设置 如 下 : 
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IMPORTING 

INFOCUBE LIKE ВАРІ6200 – INFOCUBE 

KEYDATE LIKE . BAPI6200 - KEYDATE 
EXPORTING 

RETURN LIKE ВАРІКЕТ2 STRUCTURE ВАРІКЕТ2 
TABLES 

SELECTION STRUCTURE ВАРІ62005І, 

CHARACTERISTICS STRUCTURE . BAPI6200FD 

KEYFIGURES STRUCTURE . BAPI6200FD 

DATA STRUCTURE  BAPI6100DA 


相关 的 参数 说 明 如 下 : 

1) INFOCUBE 是 信息 块 的 技术 名 称 。 

2) KEYDATE 是 查询 的 运行 日 期 或 指定 的 关键 日 期 ， 对 于 主 数据 的 导航 属性 ， 需 要 自 
行进 行 代码 的 编写 ， 逐 个 处 理 。 

3) RETURN 是 ВЕС 函数 的 返回 值 ， 必 须 给 函数 一 个 明确 的 指令 ， 如 一 个 明确 的 退出 指 
令 ， 否 则 用 户 就 有 可 能 在 Bex 前 端 一 直 等 待 程序 的 结 

4) SELECTION 包含 了 在 前 端 查询 中 定义 的 相关 选择 条 件 ， 其 中 变量 已 经 被 赋予 了 需要 
的 值 ， 如 根据 别 的 变量 派生 而 来 的 值 。 该 参数 的 结果 为 :“EXPRESSION ІМЕООВЈЕСТ, 
SIGN, OPTION, LOW, HIGH" , 

其 中 ， 最 重要 和 最 难 的 是 EXPRESSION, ， 因 为 如 果 此 段 逻辑 的 值 是 0， 则 对 应 的 限制 条 
件 就 是 全 局 限制 条 件 ， 而 若 其 结果 不 是 0， 则 限制 条 件 只 是 对 应 到 一 行 或 一 列 ， 又 或 对 应 到 
某 个 单元 格 。 

例如 ， 在 EXPRESSION 中 有 如 下 内 容 : 


Expression InfoObject Sign Option Low High 

0 MATERIAL I EQ ' 4711 

0 MATERIAL I FQ ' 4712 

0 CUSTOMER I FQ ' CUSTOI 

0 CUSTOMER I BT ' CUSTO4 ' CUSTOÓ 
1 COLOR I EQ ' RED 

2 SIZE I EQ ' XXL 

2 SIZE I EQ 'XL 

2 SEX I EQ ' MALE 


那么 ， 对 应 到 的 open SQL 应 该 是 如 下 语句 : 


( ( Material = 4711 OR Material + 4712 ) 

AND( Customer = CUSTO! OR Customer between CUSTO4 AND CUSTO6 ) ) 
AND( ( COLOR = RED ) 

OR( (SIZE ХХІ, OR SIZE + XL ) AND( SEX + MALE ) ) ) 
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CHARACTERISTICS 和 KEYFIGURES 是 包含 在 QUERY 中 使 用 到 的 特性 和 关键 指标 的 两 
个 表 ， 这 两 个 表 有 相同 的 数据 结构 ， 即 


INFOOBJECT, DATATYPE, DECIMALS, SIGN, LENGTH, OFFSET, LOWERCASE 


此 处 的 LENGTH 和 OFFSET 十 分 重要 ， 因 为 通过 这 两 个 字段 的 信息 可 以 找到 对 象 在 返 
表格 的 哪个 位 置 可 以 获得 。 当 然 ， 本 处 的 INFOOBJECT 不 仅 指 信息 块 中 的 基本 信息 对 象 ， d 
航 属 性 也 被 当 作 信息 对 象 进行 处 理 。 

DATA 中 包含 了 给 查询 返回 来 的 数据 信息 ， 仪 包含 CONTINUATION 和 DATA 两 个 字段 ， 
DATA 包含 250 个 字符 。 如 果 存 放 数 据 250 个 字符 不 够 用 ， 那 么 需要 另 起 一 行进 行 存储 ， 只 
有 在 此 时 字段 CONTINUATION 才 会 被 赋值 “X”, 但 是 我 们 需要 这 样 理解 ， 所 有 尚未 结束 的 
行 都 会 被 标记 “X”， 只 有 最 后 一 行为 结束 行 ， 该 字段 才 为 空 

假设 读 取 的 特性 如 下 : 


INFOOBJECT DATATYPE | DECIMALS SIGN LENGTH OFFSET LOWERCASE 
RSDRV. COI CHAR 0 6 0 
RSDRV. C02 CHAR 0 6 6 
RSDRV. C03 NUMC 0 3 12 
RSDRV CO3, RSDRV NOI CHAR 0 6 15 
RSDRV CO3, RSDRV, NO2 CHAR 0 6 21 
OCALDAY DATS 0 8 21 


需要 读 取 的 关键 指标 如 下 : 


INFOOBJECT DATATYPE | DECIMALS SIGN LENGTH OFFSET LOWERCASE 
RSDRSKYFI INT4 0 X 11 35 
RSDRSKYF2 DEC 3 X 23 46 
结果 表 如 下 : 
CONTINUATION DATA 


C01, 01C02, 02102NO01, 02NO2 1120010101 1 1. 000 


C01, 01С02 02112Х01 02NO2 1220010101 1 1. 000 


C01, 01C02, 03102Х01 02NO2 1120020101 1 1. 000 


对 象 类 СІ, RSDRV. REMOTE IPROV. SRV 中 包含 相关 服务 ， 这 些 服 务 可 以 用 来 创建 基 
于 BAPI 的 虚拟 信息 块 ， 示 例 代 码 如 下 。 


FUNCTION ZRSDRV_RCI1. 


ж ж 


* " Local Interface: 


ж" IMPORTING 
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ж" VALUE(INFOCUBE) TYPE BAPI6200 – INFOCUBE 
*" VALUE(KEYDATE) TYPE BAPI6200 - KEYDATE OPTIONAL 
*" EXPORTING 

*" VALUE(RETURN) TYPE BAPIRET2 

ж" TABLES 

ж" SELECTION STRUCTURE BAPI6200SL 

ж" CHARACTERISTICS STRUCTURE BAPI6200FD 

*" KEYFIGURES STRUCTURE BAPI6200FD 

*" DATA STRUCTURE BAPI6100DA 

*" EXCEPTIONS 

* " COMMUNICATION. FAILURE 

ж" SYSTEM FAILURE 


DATA: 
1 г srv TYPE ref to СІ, RSDRV. REMOTE IPROV SRV, 
1 th. mapping ТҮРЕ CL RSDRV REMOTE IPROV SRV => TN TH IOBJ FLD MAPPING. 


break — point ID ZRSDRV. ЕСІ. 


perform build mapping. table 


changing 1 th. mapping. 


create object 1 т. srv 

exporting 

i tablnm = ZRSDRVRCI 

i th iobj fld mapping =1 th mapping. 


1 r srv —> open. cursor( 

i t. characteristics = characteristics| | 
i t. keyfigures - keyfigures[ | 

i t selection = selection| | ). 

1 r srv —> fetch, pack, data( 
importing 

e t. data = data[ | ). 

return — type = Š . 


ENDFUNCTION. 


*& 
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ж & Form build, mapping table 
*& * < 


Form build, mapping. table 

changing 

c. th. mapping ТҮРЕ CL. RSDRV. EXTERNAL IPROV. SRV = > TN. ТН IOBJ. FLD. MAPPING. 
DATA: 

1 s map TYPE CL RSDRV, EXTERNAL IPROV. SRV = > TN. S IOBJ FLD MAPPINC. 

18 map – iobjnm = OCALDAY . 

18 map - fldnm = CALDAY . 

insert | s map into table c th. mapping. 

* ... do the same with other infoobjects 


endform. "build mapping table 


第 二 种 情况 : 不 勾 选 任何 复 选 框 ， 这 也 是 一 种 常用 的 设置 ， 此 时 系统 的 参数 设置 如 下 : 


IMPORTING 

I INFOPROV TYPE RSINFOPROV 

I TH SFC TYPE RSDRI TH SFC 

I TH SFK ТҮРЕ RSDRI TH SFK 

I T RANGE ТҮРЕ  RSDRI T RANGE 

I TX RANGETAB TYPE  RSDRI TX RANGETAB 

I FIRST CALL ТҮРЕ RS BOOL 

I PACKAGESIZE TYPE I 

I BASIC INFOPROV ТҮРЕ БӘР INFOCUBE 
EXPORTING 

E T DATA TYPE STANDARD TABLE 

E END OF DATA TYPE RS BOOL 

E T МС TYPE RS T MSG 


与 第 一 种 情况 不 同 的 是 ， 由 于 在 这 种 情况 下 不 需要 对 外 进行 数据 输出 ， 因 此 此 处 函数 返 
回 的 是 BW 系统 内 部 使 用 的 结构 。 同 时 ， 在 第 一 种 情况 下 水 数 只 会 被 调用 一 次 , 但 是 本 处 孙 
数 将 被 反复 调用 ， . END. OF. DATA 被 赋值 “RS_TRUE”， 因 此 如 果 第 一 种 
情况 无 法 满足 系统 性 能 的 要 求 ， 则 需要 考虑 使 用 第 二 种 情况 。 

第 三 种 情况 : 2 “SID 支持 ” 复 选 框 , 但 是 不 勾 选 “打包 RFC” 复 选 杠 时， 系统 的 
参数 设置 如 下 : 


IMPORTINC 
I INFOPROV TYPE | RSINFOPROV 
I KEYDATE TYPE RRSRDATE 
I TH SFC TYPE RSDRI TH SFC 
I ТН SFK ТҮРЕ RSDRI TH SFK 
I TSX SELDR TYPE RSDD TSX SELDR 


273 


I FIRST CALL ТҮРЕ RS BOOL 
I PACKAGESIZE TYPE I 

EXPORTING 
E T DATA TYPE STANDARD TABLE 
E END OF DATA TYPE RS BOOL 
E T МС ТҮРЕ RS T MSG 


在 这 种 情况 下 ， 虽 然 义 选 了 “SID 支持 ” 复 选 框 ,但 是 这 并 不 意味 着 我 们 能 够 自行 定义 
SID， 只 是 说 明 系 统 在 返回 特性 值 时 ， 同 时 也 返回 了 特性 的 SID。 这 样 的 功能 在 SEM - BCS 
中 显得 尤为 重要 ， 因 为 在 BCS 中 存储 数据 的 对 象 本 身 并 不 提供 报表 功能 ， 我们 需要 在 此 基 
础 上 建立 虚拟 信息 提供 者 。 这 些 虚 拟 信 息 提供 者 从 实际 存储 数据 对 象 中 读 取 数据 和 SID ， 因 
此 OLAP 处 理 器 就 不 再 需要 对 SID 进行 额外 的 解析 工作 了 。 


6.2.3 实施 虚拟 信息 块 


假设 场景 : 产品 的 销售 价格 通常 会 随 着 市 场 的 变动 而 发 生 改变 ， 而 且 不 同 的 产品 的 销售 
价格 调整 又 是 在 不 同时 间 点 进行 ， 但 是 用 户 往往 希望 看 到 最 近 一 次 的 调价 日 期 、 调 整 之 前 的 
价格 和 调整 之 后 的 价格 等 信息 ， 在 此 种 情况 下 ， 我 们 就 需要 使 用 虚拟 信息 块 。 
物料 价格 调整 透明 表 ZDM_CPTJ 的 定义 如 图 6-8 所 示 ， 其 包含 的 数据 如 图 6-9 所 示 。 
字典 ; 显示 表 
[7] іш eee CDHE тык xs Өт 


字典 : 显示 表 

ЕН @ ЫШ аже ШЕ EB BB | көне || gəl... | Append Structure... | 
转帐 表 ZDM_CPTJ 激活 
短文 本 产品 调价 


ANDT М | М MANDT CLNT | E] OP 
OWL М! М /BIC/ZQIGOWL CHAR | 18 0 物料 
i^ М ZDN TTRO DATS | 8 0 调价 日 其 
O/O 2и THI DE | 17 3 调整 后 价 
图 6-8 物料 价格 调整 透明 表 定 义 
E 
表 视 图 (T) REE) 转 到 (6) ARS) 实用 程序 (U) 系统 (Y) 帮助 (H) 
[e шап еве nnus nnus 
显示 视图 "产品 调价 ": 总 览 
alma 


10-01 2012. 01. 01 1,010,101. 000 
1N-1 2011.12. 03 888. 000 
1N-i 2011.12. 23 866. 000 
Ш-2 2012. 05. 01 777. 000 
1N-3 2012. 01. 01 666. 000 
17-3 2012. 05. 01 888. 000 
1N-3 2012. 07. 01 99 


6-9 透明 表 数 据 


5 
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使 用 的 信息 块 的 FM 设置 如 图 6-10 所 示 ， 不 勾 选 “ 打 包 RFC” 和 “SID 支持 ” 复 选 框 。 


信息 块 |ѕтнотсо2 | 
Hië | | 


功能 模块 ZDENO VC 4 SINOVCOl| | 


ЖЕНЕКЕ 
口 不 支持 

口 仅 全 局 选择 条 件 
Пана 


OHE ВЕС 
BERA 
[ 1510 支持 


器 


6-10 ”信息 块 功能 函数 的 属性 定义 
新 建 信 息 块 SINOVC01 的 构成 如 图 6-11 所 示 。 


功能 [ 开 [数据 . [长 [关键 ，[ 累 [d [m [ы [参考 信息 [单位 ae 
国 版 本 Ó 正在 处 理 
国 保存 © 未 保存 
B 修订 版 本 三 | 活动 版 本 
B 对 象 状 态 Gy 活动 , 可 执行 
p dam 
v 0# 
b 2 156 SINOVCO1P 
7 нїн SINOVCO1T 
Ф 日 历 天 OCALDAY DATS 08 ODATE 
p 22 65 SINOVCO1U 
ub: | — SINOVCO11 TT _ 
题 物料 GOWL CHAR 18 GOWL 
D O 导航 属性 
v Оза 
4 调整 前 价格 KOTZQJG DEC 09 数字 (.… 区 SUM LAS KOTZQJG 
Aa 调整 后 价格 KOTZHJG DEC 09 数字 (.… 区 SUM LAS KOTZHJG 


图 6-11 信息 块 SINOVC01 的 构成 


函数 组 抬头 定义 的 代码 如 下 。 


FUNCTION - POOL zdemo. vc. " MESSAGE -ID .. 


TYPE - POOLS: rs, rsdrc, rrcl, rshi. 


. Begin note 1166303 
TYPE - POOLS: rsarc. 


*& 


*& Form  handover data 


ж & 
FORM handover. data 
TABLES 11 sfc 
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11 sfk 
] t. data 


e t data. 


DATA: l s sfc TYPE rsdri, в. віс, 
1 s sfk TYPE rsdri, s. sfk. 


FIELD - SYMBOLS: «e s data» TYPE ANY, 
«l source» TYPE ANY, 
<І target > TYPE ANY, 
«s edata » TYPE ANY. 


ASSIGN LOCAL COPY OF INITIAL LINE OF e t data TO «e s даа >. 


* L T DATA--» E T DATA 


LOOP AT І t data ASSIGNING «s edata >. 
ж – – Schleifeüber die Merkmale 
LOOP AT 1 t. кіс INTO 1 в кіс. 
ASSIGN COMPONENT 1. s sfe — chanm 
OF STRUCTURE «s edata > 
TO «l source >. 
ASSIGN COMPONENT 1. в sfe – chaalias 
OF STRUCTURE «e s data » 
TO «l target >. 
«] target >= <І source >. 
ENDLOOP. 


ж – – Schleifeüber die Kennzahlen 
LOOP AT 1 t sfk INTO 1 s sfk. 
ASSIGN COMPONENT 1. s sfk — kyfnm 
OF STRUCTURE < s. edata > 
TO «l source >. 
ASSIGN COMPONENT 1. s. sfk — kyfalias 
OF STRUCTURE «e s data > 
TO «l target >. 
IF ] s sfk — kyfalias МЕ IROWCOUNT . 
«] target >= «l source >. 
ENDIF. 
ENDLOOP. 
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APPEND «e s data» TO e t data. 
ENDLOOP. 
ENDFORM. " handover data 


信息 块 函 数 zdemo. ve. 4. sinovc01 的 定义 的 代码 如 下 。 


FUNCTION zdemo_vc_4_sinovc01. 


* " ж "Local interface: 


ж" IMPORTING 


ж" REFERENCE(I INFOPROV) TYPE RSINFOPROV 

ж REFERENCE(I TH SFC) ТҮРЕ RSDRI TH SFC 

ж REFERENCE(I ТН ЗЕК) ТҮРЕ RSDRI TH 5ЕК 

ж REFERENCE(I T RANGE) ТҮРЕ RSDRI T RANGE 

жн REFERENCE(I TX RANGETAB) ТҮРЕ RSDRI TX RANGETAB 
ж REFERENCE(I FIRST CALL) TYPE R$ BOOL 

ж REFERENCE(I PACKAGESIZE) TYPE I 

ж REFERENCE(I BASIC INFOPROV) ТҮРЕ БАр INFOCUBE OPTIONAL 
ж EXPORTING 

ж REFERENCE(E T DATA) ТҮРЕ STANDARD TABLE 

ж REFERENCE(E END ОҒ DATA) TYPE RS BOOL 

ж REFERENCE(E T MSG) ТҮРЕ RS T М5С 


FIELD -SYMBOLS: «t edata lap > TYPE STANDARD TABLE. 


жж local data declarations 


DATA: 1 t sfc TYPE rsdri, t sfc, 
] t sfk TYPE rsdri, t. sfk ， 
] t віс save TYPE rsdri, t sfc, 
] t sfk save ТҮРЕ rsdri, t. sfk. 


* Range tables 


DATA: 1 t range ТҮРЕ rsdri t range, " 存储 报表 中 的 选择 条 件 
] t range save ТҮРЕ rsdri t range, " 存储 报表 中 的 选择 条 件 ( 临 时 ) 
ж... Deep structure for i_tx_rangetab 
] tx rangetab ТҮРЕ rsdri, tx rangetab, 
1 ѕ rangetab ТҮРЕ rsdri_sx_rangetab." 存 储 报表 中 的 选择 条 件 (结构 ) 
DATA: lt_edata_lap TYPE REF TO data. 
DATA: g etabname TYPE rstlogotab. "虚拟 信息 块 的 结构 
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ШЕСІ =i oth кіс. "信息 块 中 所 有 的 CHAR 列表 
] t sfk =і th sfk. "信息 块 中 所 有 的 КҮК ІІ 


< 
] t sfe, save = ij th, кіс. 
] t sfk save = i th. sfk. 
1 t тапге( | -i t range[ ]. "将 选择 条 件 赋 值 到 工 T_RANGE 
1_1_гапре_зауе[ ] = i t range[ J 
] tx rangetab[ | -i tx rangetab[| ]. 


* determine structure of virtual infoprovider( SINOVCOI ) 
* 获得 目标 虚拟 信息 块 的 结构 ,如 本 处 的 /BICZVSINOVC012 
CALL FUNCTION RSD. TNAMES GET FOR, CUBE 


EXPORTING 

i infocube ті infoprov 
IMPORTING 

e viewtiobjnm2 = 5 etabname 
EXCEPTIONS 

name, error ES! 

OTHERS =2. 


ж 如 果 尚 未 有 激活 版 本 , 则 直接 退出 程序 
IF sy - subre < > 0. 
CLEAR о etabname. 
EXIT. 
ENDIF. 
x 将 结果 数据 结构 赋值 给 table «t edata, lap > 
CREATE DATA lt_edata_lap ТҮРЕ TABLE OF(g etabname). 
ASSIGN It. edata lap -> * TO «t edata lap». 


DATA: ls data ТҮРЕ /bic/vsinovcO12. "根据 函数 读 出 来 的 结构 指定 本 地 结构 
DATA; lt_src_cptj ТҮРЕ STANDARD TABLE OF  zdm ері, KIAK 

ls src cptj TYPE тап ері), "原始 结构 

lt saved. cptj TYPE STANDARD TABLE OF хіт ері," 比较 表 

ls. saved, ері) TYPE тап ср}. "比较 结构 


米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 米 

x* 定义 计数 器 1]_counter, 如 果 只 有 1 条 , 则 直接 插入 目标 表 <t_edata_lap > ,只 有 调整 后 价格 , 

x 没有 调整 前 价格 ;如 果 有 两 条 , 则 以 后 面 1 条 的 价格 作为 调整 后 价格 加 到 第 1 条 数据 上 

ЖЕЖ ЖЖЖ Ж ЖЖЖ ЖЖ ЖЖЖ Ж Ж ЖЖЖ ЖЖ Ж ЖЖЖ ЖЖ ЖЖЖ 
DATA: 1 counter TYPE i. 

2 E k k GRE GR SK ЖЖЖ ЖЖЖ Ж ЖЖЖ ЖЖ 

* 定义 本 地 查询 变量 结构 ,从 lt range 中 读 取 

ЖЖЖ ЖЖЖ ЖЖ ЖЖЖ HR OR CR GR R K K R R R 


DATA: 1 s range ТҮРЕ rsdri. s range. 
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жж 根据 查询 条 件 取得 数据 
READ TABLE І t range INTO 1l s range WITH KEY chanm = OCALDAY . 


IF 1 s range IS NOT INITIAL. 
* 取得 截止 日 期 以 及 之 前 所 有 调价 记录 ,并 按照 产品 和 日 期 倒 排 ,以 便 进行 从 后 向 前 的 搜索 
SELECT ж FROM  zdm ері) 
INTO CORRESPONDING FIELDS OF TABLE lt. sre, cptj 
WHERE tjrq <=1 s range - high 
ORDER BY e0wl уга DESCENDING. 


ELSE. 
* 如 果 没有 指定 日 期 , 则 将 所 有 记录 筛选 出 来 ,并 按照 产品 和 日 期 倒 排 ,以 便 进行 从 后 向 前 的 
搜索 


SELECT ж FROM  zdm ері) 
INTO CORRESPONDING FIELDS OF TABLE lt src, cptj 
ж WHERE ша «-1 s range — high 
ORDER BY g0wl уга DESCENDING. 
ENDIF. 
* 删除 那些 维护 后 价格 为 0 的 记录 ,减少 数据 处 型 
LOOP АТ lt_src_cptj INTO ls, src. cptj. 
IF 15 sre. еруу - tzhj = 0. 
DELETE lt src. еру. 
ENDIF. 


ENDLOOP. 
* 将 1t sre. optj 的 第 一 条 数据 读 取 到 Is. saved. еру 中 ,便于 和 表 中 的 记录 进行 逐一 比较 


ТЕҢ 
ш) 
ІШ 


READ TABLE lt src. ері) INTO ls saved. сері) INDEX 1. 
IF sy — subre NE 0. 

e end of data = X. 

EXIT. 


ж 逐一 LOOP lt, src. cptj 表 中 的 每 条 记录 ,与 对 照 结 构 ls_saved_cptj 中 的 内 容 进行 比较 
ж 如 果 两 个 的 物料 (GOWL) 相同 , 则 说 明 是 同一 物料 的 不 同 价格 ,使 用 计数 器 1_counter 进行 
记 数 

* 如 果 是 第 一 条 , 则 将 结构 调价 后 价格 和 物料 以 及 调价 日 期 填 人 目标 结构 


* 如 果 是 第 二 条 , 则 将 调整 前 价格 放 和 目标 结构 的 调整 前 价格 (上 次 调整 价格 ) 


[J— 


1 counter = 0. 


LOOP AT lt. src. ері) INTO ls src. cptj. 


"第 一 条 肯定 是 相等 的 ,将 1_counter 0 


IF 15 src. cptj - g0wl 21s saved, cptj - gOwl. 


1 counter - ] counter +1. 
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ELSE. " 当 比 较 发 现 不 同时 , 则 插入 到 < t_edata_lap > 中 ,同时 重 置 counter 的 值 
IF sy —tabix =2 AND l counter =1. " 如 果 有 且 仅 有 一 条 数据 
INSERT ls data INTO TABLE «t edata lap». "插入 数据 
CLEAR 15 data. 
ENDIF. 


а 


E I counter 的 值 


] counter = 1. 


ENDIF. 


CASE 1 counter. 


WHEN 1. 
x 是 物料 的 第 一 条 记录 ,因此 将 值 赋 给 ls_data 
ls. data — gOwl -]s sre ері) — gOwl. "调价 的 物料 
ls. data – Ocalday -]s src сері – tjrq. "调价 日 期 
ls. data - kOtzhjg -]s src. сері) — tzhj. "调整 后 的 不 含 税 价格 
ls data – lrowcount =1. 
WHEN 2. 
ж 如 果 出 现 且 等 于 2, 则 说 明 得 到 了 想 要 的 数据 ,直接 将 调整 前 价格 字段 替换 为 第 二 条 
ls. data — kOtzqjg -]s src. сері) — tzhj. "调整 前 的 不 含 税 价格 


INSERT Is data INTO TABLE «t edata lap >. 
CLEAR 15 data. 


WHEN OTHERS. 
ENDCASE. 


* 每 条 比较 完毕 后 ,将 对 比 结构 替换 为 刚才 被 比较 的 记录 ,以 便 和 下 一 记录 进行 对 比 


ls saved. cptj = ls_src_cptj. 


ENDLOOP. 


* 特殊 处 理 : 最 后 一 个 物料 数据 ,同时 只 有 一 条 记录 


IF 1. counter = 1. 


ls data – gOwl = ls. sre, ері) – gOwl. "调价 的 物料 

ls data -0calday = ls src, ері) - tjrq. "调价 日 期 

ls data — kOtzhjg -]s saved ері) - tzhj. "调整 后 的 不 含 税 价格 
ls. data – 1 rowcount =1. 


INSERT Is, data INTO TABLE «t edata lap >. 
CLEAR 15 data. 
ENDIF. 
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жж SAP 固定 的 语句 ,将 数据 交 给 系统 进行 处 理 eon жж 
PERFORM handover_data 
TABLES 1 t sfc save 
1 t sfk save 
«t edata lap > 
e t data. 
e end of data = X. 


ENDFUNCTION. 


最 后 ， 通 过 数据 仓库 工作 台 显 示 信 息 块 SINOVC01 中 的 数据 ， 如 图 6-12 所 示 。 


= 
| 列表 (L) REE) 转 到 (6) МЕК) 设置 (5) 系统 (Y) 帮助 (H) 
“ з а@ ае BARI ann 


"SINOVCO1", 清单 输出 
(eda P И ЕШ вн 


G0WL [оснмстр | 记录 类 型 [请求 标记 | 0CALDAY | 调整 后 价格 [korzo] 
1М-01 2012.01.01 1,010,101.000 | 0.000 
1M-1 2011.12.23 866.000 888.000 
1M-3 2012.07.01 999.000 |888.000 
1M4 2012.07.01 4,444.000 | 0.000 


图 6-12 ”信息 块 数据 预 览 


6.2.4 单元 小 结 

标准 信息 块 所 能 执行 的 功能 满足 了 大 部 分 情况 下 我 们 对 数据 进行 统计 和 多 维度 分 析 展 示 
的 需要 ,但 是 少数 情况 下 ， 在 数据 之 间 具 有 复杂 逻辑 的 情况 下 ， 一 种 方式 是 可 以 将 数据 上 载 
到 DSO 中 ， 在 上 载 的 过 程 中 进行 转换 的 代码 增强 ， 但 是 这 样 的 方式 适用 于 对 数据 实时 性 要 
求 不 高 的 需求 ， 如 果 要 求 数 据 实 时 展示 ， 同 时 又 要 求 有 非常 复杂 的 业务 逻辑 运算 ， 那 么 使 用 
基于 功能 模块 的 虚拟 信息 块 是 一 种 可 靠 的 解决 方案 。 


6.3 虚拟 关键 指标 


6.3.1 应 用 场景 描述 


在 项 目的 实施 过 程 中 ， 在 极 少数 情况 下 需要 使 用 虚拟 关键 指标 ， 这 种 虚拟 关键 指标 本 身 
在 信息 块 中 可 能 并 不 赋值 ， 只 是 在 结构 上 进行 了 定义 ， 其 值 是 在 报表 运行 的 过 程 中 由 АВАР 
程序 进行 动态 更 新 ， 并 且 最 终 展 现在 报表 上 。 例 如 ， 在 ЕВР 系统 中 ， 库 存 价值 评估 只 到 工 
三 级 别 ， 如 果 需 要 在 库 位 级 别 看 到 库存 ， 则 只 能 通过 如 下 公式 计算 得 到 : 


库 位 级 别 的 价值 = 工厂 级 别 的 价值 * 库 位 的 数量 /工厂 级 别 的 数量 
由 于 上 述 场景 相对 复杂 ， 为 了 能 将 功能 增强 完 完全 全 地 展示 出 来 ， 所 涉及 的 模型 较 多 ， 
因此 本 节 将 使 用 更 为 简单 的 例子 进行 说 明 ， 即 使 用 “销售 价格 = 销售 金额 /销售 数量 ”的 方 
式 进行 分 析 和 说 明 。 
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SAP 提供 了 两 种 不 同 的 对 虚拟 关键 指标 进行 处 理 的 方法 : 第 一 种 是 使 用 增强 RSR00002 
中 的 用 户 出 口 对 指标 进行 增强 ; 第 二 种 是 使 用 面向 对 象 的 BADI RSR_OLAP_BADI 中 的 方法 
对 指标 进行 增强 。 


6.3.2 使 用 系统 提供 的 增强 进行 处 理 
下 面 的 示例 将 使 用 BW 系统 自身 提供 的 增强 RSR00002 进行 处 理 ， 该 SAP 增强 只 针对 
"BW: 报表 中 的 虚拟 特征 和 关键 值 ”进行 处 理 。 


首先 ， 必 须 通过 事务 码 CMOD 将 增强 RSRO0002 包括 到 一 个 激活 的 项 目 中 ， 还 里 使 用 之 
前 使 用 到 的 项 目 “ZBW”， 如 图 6-13 所 示 。 


[E 
| 项 目 (P) 编辑 (E) 转 到 (6) Environment 系统 (Y) 帮助 (H) 


Q аш савесив ammessi @ m 

SAP 增 强 在 增强 项 目 ZBW 里 

Хаа ЕСІ 

增强 短文 本 

RSAPO001 在 АРІ 服务 中 的 客户 函数 调用 | 
RSR00001 | [Br 报表 中 全 局 变量 的 增 吕 。 E 
RSR00002| ВІ: 报表 中 的 虚拟 特征 和 关键 值 |0 | 

| | 


Р 6-13 1% RSRO0002 包含 在 ZBW 项 目 中 


通过 事务 码 SMOD 进入 增强 RSR00002， 如 图 6-14 所 示 。 


SAP 增 强 RSR00002 的 属性 
2) | E2] | Gat 
ТЕҢ RSR00002 
短文 本 (BI: 报表 中 的 虚拟 特征 和 关键 值 
管理 数据 。 
开发 类 RSROA 
原 语言 DE 
创建 者 SAP 
最 后 修改 SAP 2008. 08. 23 


ІІ 6-14 RSR00002 增强 


单 击 组 件 ， 进 入 增强 包含 的 功能 函数 ， 如 图 6-15 所 示 。 


退出 功能 模块 
功能 模块 各 短文 本 
EXIT, SAPMRSRU 001 BW: Definition of Virtual Characteristic and Key Figure 
EXIT. SAPMRSRU, 999 BW: Initializing of Field Positions for User Exit 


图 6-15 RSRO0002 增强 包含 的 功能 函数 


然后 ， 在 系统 中 定义 信息 块 V_1， 定 义 关 键 指标 : 数量 、 净 价 和 金额 ,但 是 ， 在 定义 对 
其 更 新 的 转换 中 ， 并 不 定义 金额 的 更 新 规则 ， 如 图 6-16 所 示 。 
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[多 5шо$1 #02 (5100502) 


BlC/eoGSDM 公司 代码 
_| .|CALYEAR ami 
JBIC/GOWL 

/6IC/KoxssL “| 销售 数量 
UNIT знате 
 |BICKOXSE ЕФЖ | 
| CURRENCY жт 


1 wi OCALYEAR © 日 历年 
| Е n GOGSDM AP | 公司 代码 т | 
зд ew две ”| 口 
p= kose |4 (кож m BERE ” 
= Koss | 5 | oss. а на | 


% KOXS)G |6) |KOxSJG Ма 销售 价格 | 


图 6-16 转换 的 定义 


义 完毕 后 ， 为 了 在 报表 中 得 到 金额 的 具体 数据 ， 需 要 进入 增强 函数 EXIT_SAPMRSRU 
du 二 字段 的 定义 以 及 字段 计算 规则 的 定义 。 先 进入 函数 EXIT. SAPMRSRU. 001, ， 使 用 转 
到 总 体 程 序 进行 字段 的 定义 ， 如 图 6-17 所 示 。 


= Б 
Function Module Edt Goto Utiitie((M) Environment 系统 (Y) 帮助 (H) 
A Global Data HR лї з аа оа 


Function Builder: 


———Àeo ЕСКЕ СЕТІН * 
51 А | @ ness |@|[@[ рэкет | | ЕҢ|ЕГ nsert | [E керәсе |[ET Delete |5 [Function Module Documentation 
Further Options , 
Function module тт СТІНЕ ШЕТЕН 
ILL E Object Directory Entry 
Documentation 


Translation 
Application Help 
Back 


*"*'Lokale Schnittstelle: 


ж” IMPORTING 

ж” VALUE(I S RKBI1D) ТҮРЕ RSR S RKBID 

ж“ REFERENCE(I TH CHANM USED) ТҮРЕ КЕКЕ ТН CHANN OPTIONAL 
ж” REFERENCE(I TH KYFNM USED) ТҮРЕ КЕКЕ TH КҮЕНШ OPTIONAL 
*' EXPORTING 

ж” REFERENCE(E Т СНАНИ) ТҮРЕ КЕКЕ T СНАНИ 

ж“ REFERENCE (E_T_KYFNM) TYPE RSD T KYFNIM 


” 


EPE 
include zxrsru02 . 


endfunction. 


Li9, Co 35 Ln 1 - 18 íf Ln 18 


6-17 和 转 到 函数 的 Main Program 
进入 主 程序 后 ， 可 以 看 到 需要 进行 增强 的 程序 include lxrsrtop， 如 图 6-18 所 示 。 


程序 (P) 编辑 (E) REG) 实用 程序 (U) Environment RY) 帮助 (H) 


| s ан еве BHR аъла пао 
ABAP 编 辑 器 :显示 FunctionPool SAPLXRSR 
J|] |Ә ӘП ТЕЕ ИЕГІН | e] a | Er [icf ах ) [ef es [27 me ] | 取消 


FunctionPoo! SAPLXRSR | 活动 的 


REBI aelekea Т 


e EEE 


Ж — Systen-defined Include-files. * 
ЭСЕ АКЕ АЕ ЗЕ skak akk kk kkk kkk kkk kkka ае 
include lxrsrtop. * Global Data 
include lxrsruxx. * Function Modules 


Ее 
include lxrsrf00. 
“ САР-Еоглроо1 for Customer-Use 
include zxrsrzzz. ” Subprograms and Modules 


图 6-18 增强 函数 的 主 程序 
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进入 程序 include lxrsrtop 后 ， 可 以 看 到 需要 自 定 义 的 include zxrsrtop. , Ш 6-19 
所 示 。 


Рано MEE 转 到 (G) 实用 程序 (U) Environment FRY) 帮助 (H) Ы BI SAP A 
[€ | a ча сае вав апаа аав 

ABAP 编 辑 器 :显示 包括 LXRSRTOP 
ЕРЮ ЕЕЕ | ЕГІН | AAs] | Er [rcf [27 е ] [ef ws ] |i mas 


包括 LXRSRTOP 活动 的 
s [Eee bed Т1 [z [3 
function-pool xrsr. "MESSAGE-ID .. 


include lxrsrtap. 
”Global Data For SAP Formpool and Templates 


include zxrsrtop. * Global Data 


Li7, Co 1 ni1-7 行 In7 


Ж 6-19 ”需要 自 定义 的 zxrsrtop. 


双击 include zxrsrtop. 进行 处 理 ， 在 其 中 定义 全 局 需要 处 理 的 字段 ， 具 体 如下。 


ж &- ж 
* & 包括 ZXRSRTOP 
ж & ж 
DATA: = ров v. 1 Ocalyear TYPE i. 
DATA: g pos v. 1 kOxssl TYPE i. 
DATA: g pos v. 1. kOxsjg TYPE i. 
DATA: g pos v. 1. kOxsje TYPE i. 


定义 好 全 局 变量 后 ， 进 入 增强 函数 EXIT SAPMRSRU. 001 的 包括 程序 ZXRSRUO2 中 ， 
并 上 且 在 程序 中 定义 e t chanm 和 e_t_kyfnm 包含 的 内 容 ， 代 码 如 下 。 


注意 ， 此 处 的 定义 必须 是 g_pos_v_1_ < 信息 对 象 技术 名 称 > ， 并 且 必 须 是 ТҮРЕ I, 


ж & 
ж & 包括 ZXRSRUO2 
*& 


DATA: 1 s chanm TYPE rrke s chanm. 
DATA: 1 subrcl TYPE sy - subrc. "execute only, if key figure really used 


CASE і s rkbld - infocube. 
WHEN V 1. "虚拟 信息 块 V_1 


READ TABLE i th. kyfnm, used 
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WITH KEY table line 上 KOXSJG 
TRANSPORTING NO FIELDS. "观察 查询 中 是 否 用 到 了 KOXSJG 
l_subrc1 = sy — subrc. 
IF ]_subrcl =0. "only if КҮК used at аЙ... 
« 会 计 年 度 
1 в chanm – chanm =+ OCALYEAR . 
1 s chanm - mode = rrke, с mode – read. 
APPEND 1. s chanm TO e t chanm. 
ENDIF. 
APPEND KOXSSL TO e t kyfnm. 
* 价格 
APPEND KOXSJG TO e t. kyfnm. 
ж 金额 
APPEND KOXSJE TO e t kyfnm. 
ENDCASE. 


再 次 进入 主 程序 ， 并 且 在 包含 程序 include zxrsrzzz 中 进行 运算 逻辑 的 编写 ,代码 
如 下 。 


ж бс ж 
* & 包括 ZXRSRZZZ 
*& * 


FORM user. v. 1 USING i. s rkbld ТҮРЕ тег s rkbld 
CHANGING c. s data TYPE any. 
FIELD -SYMBOLS «1 Ocalyear >." 会 计 年 度 
FIELD -SYMBOLS «1 kOxssl >." 数 量 
FIELD -SYMBOLS «1 kOxsjg >. "单价 
FIELD -SYMBOLS «1l kOxsje >. "金额 
+ 会 计 年 度 
ASSIGN COMPONENT g_pos_v_1_0calyear 
OF STRUCTURE c. s data ТО «1 Ocalyear >. 
«ЖЫ 
ASSIGN COMPONENT о. pos v. 1. kOxssl 
OF STRUCTURE c. s data TO «1 kOxssl >. 
+ 单价 
ASSIGN COMPONENT g_pos_v_1_kOxsjg 
OF STRUCTURE c. s data TO «1 kOxsjg >. 
ж 金额 
ASSIGN COMPONENT g pos v. 1. kOxsje 


OF STRUCTURE c. s data ТО «1 kOxsje >. 
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IF «1 К0хвві > IS ASSIGNED AND <1 kOxsjg > IS ASSIGNED AND «1 kOxsje > IS AS- 
SIGNED. 
IF <1_КОхз1> < > 0. 
«]l kOxsjg >= «l kOxsje >/ «1. kOxssl >. 
ELSE. 
«] k0Oxsjg > = 0. 
ENDIF. 
ENDIF. 


ENDFORM. "user v ] 


为 了 看 到 自 定义 虚拟 关键 指标 的 效果 ， 我 们 必须 定义 一 个 查询 ， 并 且 在 查询 中 要 使 用 
KOXSJG 这 个 指标 ， 这 样 才 能 看 到 效果 。 信 息 块 V_1 的 数据 显示 如 图 6-20 所 示 ， 查 询 的 定 
义 如 图 6-21 所 示 ， 查 询 结 果 如 图 6-22 所 示 。 


E 


列表 (L) 编辑 (E) 转 到 (G) TED RES) 系统 (Y) ARH — 
Ф аган ГӘ е pana егесіп om 


"y 1", 清单 输出 


алам [ж ae B нн“ ІН 


кк ркен | menm аан анине UN 
2000 回 67898765678 DTPR DDBBWEQW208UMPFSQBCRHJK1 Q 2010 TON m 20 T — 
2000 67898765678 DTPR DDBBWEQW2OSUMPFGQBCRHIKIQ | 2011 CNY ТОМ | 16.20 | 0.00 | 8.630 | 
2000 67898765678 DTPR DDBBWEQW208UMPFSQBCRHJK1 Q 2012 |CNY | TON | 37.57 | 0.00 | 3.160 
2000 67898765678 DTPR DDBBWEQW208UMPFGQBCRHJK1 Q 2013 CNY | TON | 3.10 | 0.00 | 0.810 | 
2000 67898765678 | | | . . |DTPR DDBBWEQW2OSUMPFGQBCRHIKIQ | 2014 CNY ТОМ | 67.23 | 0.00 | 4.860 | 
2000 67898765678 | | DTPR. DDBBWEQW208UMPFGQBCRHJK1 Q 2015 CNY | TON | 37.84 | 0.00 | 6.270 | 
2000 67898765678 DTPR DDBBWEQW208UMPFGQBCRHJK1 Q 2016 |CNY | TON | 32.07 | 0.00 | 2.170 | 
2000 67898765678 DTPR DDBBWEQVW/208UMPFGQBCRHJK1 Q 2017 CNY | TON | 40.97 | 0.00 | 4.180 | 
2000 67898765678 DTPR DDBBWEQW208UMPFGQBCRHIKiQ | 2018 CNY ТОМ | 67.92 | 0.00 | 4.490 
2000 67898765678 DTPR DDBBWEQW208UMPFSQBCRHJK1 Q 2019 CNY | TON | 9.03 | 0.00 | 6.040 | 
1000 67898765678 | DTPR. DDBBWEQW208UMPFGQBCRHIK1Q 2010 [CNY | TON | 47.37 | 0.00 | 9.770 
1000 67898765678 | EE | DTPR. DDBBWEQW208UMPFGQBCRHJK1Q 2011 CNY ТОМ | 23.06 | 0.00 | 6.840 | 
1000 67898765678 DTPR DDBBWEQW208UMPFGQBCRHJK1 Q 2012 СМҮ ТОМ | 81.03 | 0.00 | 1.070 
1000 67898765678 DTPR DDBBWEQW208UMPFGQBCRHJK1 Q 2013 CNY | TON | 93.46 | 0.00 | 2.770 | 
1000 67898765678 [DTPR DDBBWEQW2OSUMPFSQBCRHIKIQ | 2014 CNY ТОМ | 14.65 | 0.00 | 1.330 
1000 67898765678 DTPR DDBBWEQW2OSUMPFGQBCRHIKiQ | 2015 CNY ТОМ | 96.82 | 0.00 | 7.450 
1000 67898765678 |... |DTPR DDBBWEQW208UMPFGQBCRHJKi Q 2016 СМҮ ТОМ | 43.96 | 0.00 | 4.310 | 
1000 67898765678 | © |DTPR DDBBWEQW208UMPFGQBCRHJK1Q 2017 CNY ТОМ | 88.13 | 0.00 | 9.260 
1000 67898765678 DTPR DDBBWEQW2OSUMPFGQBCRHI)KiQ | 2018 CNY ТОМ | 42.59 | 0.00 | 2.190 | 
1000 67898765678 | DTPR DDBBWEQVW208UMPFSQBCRHJK1 Q 2019 CNY | TON | 69.17 | 0.00 | 6.510 | 
2000 2345609876 | DTPR DDBBWEQW208UMPFGQBCRHJK1 Q 2010 CNY ТОМ | 55.53 | 0.00 | 0.390 
2000 2345609876 DTPR DDBBWEQV/208UMPFGQBCRHJK1 Q 2011 СМҮ ТОМ | 3.67 | 0.00 | 4.720 | 
2000 23456098746 | | DTPR DDBBWEQW208UMPFGQBCRHJK1Q 2012 CNY | TON | 66.32 | 0.00 | 2.520 | 


图 6-20 信息 块 V_1 的 数据 预览 


从 查询 结果 来 看 ， 系 统 通过 销售 金额 和 销售 数量 进行 计算 ,得 到 了 销售 价格 ， 达 到 了 我 
们 既定 的 目标 。 


286 


tros 
e; 自由 特性 


g fr 

ДЗ [cocs] 公司 代码 
是 [coWL] 物料 
是 LOCALYEAR] 日 历年 


Құлан 加 行列 


6-21 信息 


B я 


日 ~ 国 жн 
4g LKOXSSL] 销售 数量 

4 [K0XSJG] 销售 价格 

4&9 [KOXSJE] 销售 金额 


预览 


a- 公 司 代 


b- 公 司 代 


a- 物 料 
b- 物 料 
a- 物 料 
b- 物 料 


a- 日 历年 
b- 日 历年 
a- 日 历年 
b- 日 历年 
a- 日 历年 
b- 日 历年 
a- 日 历年 
b- 日 历年 


т 


销售 数量 “销售 价格 销售 3 


Ж: V_1 的 查询 的 定义 


ELA arar | @® | зен 


上 次 数据 更 新 : 2012.07.24 10:37:22 


庚 拟 指标 V_1 的 查询 


保 在 视图 | ЕЗГЕ ie] [例外 和 条 件 


ЕЗ | (HHE Excel 


者 出 到 CSV 


vf 

公司 代码 ЕП SE 
日 历年 ЕТ) ЕН |56 
su rj SE 
тй 

关键 位 ІН. Ё 
7 自由 特性 


图 


6.3.3 使 用 系统 提供 的 BADI 进行 


公司 代码 fu 


日 历年 


亚洲 公司 2345609876 2010 


2011 
2012 
2013 
2014 
2015 
2016 
2017 
2018 
2019 


67898765678 2010 


6-22 fA 


2011 
2012 
2013 
2014 
2015 
2016 
2017 
2018 
2019 


处 理 


销售 数量 
3.00 TON 
5.00 TON 
5.00 TON 
5.00 TON 
4.00 TON 
3.00 TON 
3.00 TON 
1.00 TON 
9.00 TON 
4.00 TON 
10.00 TON 
7.00 TON 
1.00 TON 
3.00 TON 
1.00 TON 
7.00 TON 
4.00 TON 
9.00 TON 
2.00 TON 
7.00 TON 


息 块 V_1 的 查询 


销售 价格 
20.40 CNY 
18.41 CNY 
13.38 CNY 
15.66 CNY 
22.55 CNY 
1.72 CNY 
1.11 CNY 
41.02 CNY 
0.32 CNY 
2.31 CNY 
485 CNY 
3.37 CNY 
75.73 CNY 
33.74 CNY 
11.02 CNY 
13.00 CNY 
10.20 CNY 
9.52 CNY 
19.45 CNY 
10.63 CNY 


结果 


жеи 
67.92 СМҮ 
84.87 СМҮ 
71.99 СМҮ 
85.32 СМҮ 
97.17 СМҮ 
5.41 СМҮ 
3.77 СМҮ 
22.56 СМҮ 
3.04 CNY 
8.99 CNY 
47.37 CNY 
23.06 CNY 
81.03 CNY 
93.46 CNY 
14.65 CNY 
96.82 CNY 
43.96 CNY 
88.13 СМҮ 
42.59 CNY 
69.17 CNY 


下 面 的 示例 将 使 用 BW 系统 自身 提供 的 BADI RSR. OLAP. BADI 进行 处 理 ， 首 先 使 用 事 
务 码 SE19 进入 实施 的 定义 界面 ， 选 中 “Classic BAdI” 单 选 按 钮 ， 并 在 “BAdI Мате” Ч 


入 “RSR_OLAP_BADI”， 单 击 创 建 按 钮 进行 实施 的 创建 ， 如 图 6-23 所 示 。 然 后 
对 话 框 中 输入 实施 的 技术 名 称 “ZCL_IM_V2_IMPLT”， 


如 图 6-24 所 示 。 


进入 实施 后 ， 首 先 在 “过 滤器 ” 中 加 入 针对 哪些 信 息 块 进行 实施 的 选择 
该 BADI 在 过 滤器 中 增加 了 过 滤器 值 V_ 2， 因此 该 逻辑 只 针对 虚拟 信息 块 V_2 进行 处 理 ， 如 


图 6-25 所 示 。 


， 在 弹出 的 


条 件 。 此 处 ， 
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RSR OLAP BADI [5 


图 6-23 BADI 实施 的 创建 


[Ẹ Business Add-In Builder: Create Implementation [E] 


RSR OLAP BADI 


zcL Iw v2 ІРІП (ә 


Business Add-In Builder: Change Implementation ZCL IM V2 IMPLT 
22 Е оп | 


Р 6-25 ”信息 块 V_2 增强 BADI 的 实施 
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进入 “Interface” 标 签 页 的 程序 类 ZCL. IM. V2. IMPLT 中 ， 设 定 属性 ， 定 义 的 属性 必须 
按照 标准 的 命名 规则 进行 命名 ， 且 类 型 必须 是 “I”， 即 整 型 。 其 中 ， 特 性 必须 定义 为 P_ 
CHA_< 特性 技术 名 称 > ， 如 P_CHA_0CALYEAR; 关键 指标 必须 定义 为 P_KYF_ < 关键 指标 
技术 名 称 > ， 如 P_KYF_KOXSJG， 如 图 6-26 所 示 。 这 里 定义 了 P_CHA_0CALYEAR、P_ 
KYF KOXSSL, P KYF KOXSJE 和 P_KYF_KOXSJG 4 个 属性 。 


Ге 
| 类 别 (C) ШИШЕ) _ 转 到 (6) ARRU) Environment 系统 (Y) 者 助 (H) 
[v] nag eae ÓB,baumessita o 


类 制作 器 : 更 改 类 ZCL IM СІ IM V2, IMPLT 
ы ӨШ sl ШЫ МЕ) ЕН) [Ql 类 型 | 构造 器 上 | Class constructor | | Class documentation 


Class Interface ZCL IN CL IN V2 ІИРІТ | 已 实现 / 


P_CHA_OCALYEAR Instance Public О туе І 
Р KYF KOXSSL Instance Public Г] Type I 
P KYF KOXSJE Instance Public L] Type I | > | 
P KYF KOXSJG Instance Public Г] Type I 
Г] Type | a | 
口 Type Eez 


Р 6-26 增强 BADI 的 属性 定义 


为 了 达到 系统 在 运行 查询 时 自动 计算 金额 的 目的 ， 我 们 需要 在 方法 中 另外 添加 代码 段 ， 
以 实现 系统 的 计算 功能 ， 其 中 主要 包含 以 下 3 个 方法 : 

(D IF EX. RSR. OLAP. BADI ~ DEFINE 

(2) IF ЕХ КӨҢ OLAP. BADI ~ INITIALIZE 

(3) ІЕ ЕХ RSR. OLAP. BADI ~ COMPUTE 

总 体 说 来 ， 如 果 需 要 定义 全 局 变量 、CASE 判断 语句 和 对 СОВЕ 的 判断 ， 则 需要 在 方法 
IF_EX_RSR_OLAP_BADI ~ DEFINE 中 进行 定义 ， 示 例 代 码 段 如 下 。 


METHOD if_ex_rsr_olap_badi ~ define. 


DATA: l s chanm ТҮРЕ rrke s chanm. 
DATA: 1 subrcl TYPE sy —subrc. "execute only, if key figure really used 


CASE і s rkbld - infocube. 
WHEN V2. "虚拟 指标 信息 块 V_2 
READ TABLE i_th_kyfnm_used 
WITH KEY table line = KOXSJC 
TRANSPORTING NO FIELDS. "观察 查询 中 是 否 用 到 了 0AMOUNT 
]_subrcl = sy — subrc. 
IF 1 subrcl 20. "only if КҮК used at all... 


* 会 计 年 度 
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l_s_chanm - chanm = OCALYEAR . 
l_s_chanm - mode -ітКе с mode - read. 
APPEND 1. s chanm TO c t chanm. 
ENDIF. 
+ 数量 


APPEND KOXSSL TO c_t_kyfnm. 
* 价格 

APPEND KOXSJG TO c_t_kyfnm. 
* 金额 


APPEND KOXSJE TO c_t_kyfnm. 


ENDCASE. 


ENDMETHOD. 


如 果 硕 望 有 一 些 其 他 的 变量 声明 和 变量 默认 值 的 赋予 ， 可 以 使 用 方法 IF, ЕХ RSR —. 
OLAP_BADI ~INITIALIZE 进行 处 理 ， 由 于 本 处 不 需要 进行 其 他 复杂 处 理 ， 因 此 不 对 该 段 进 
行 代码 编写 。 

最 后 ， 所 有 的 计算 功能 都 在 方法 下 EX_RSR_OLAP_BADI ~ COMPUTE 中 进行 处 理 ， 示 
例 代码 段 如 下 。 


METHOD if_ex_rsr_olap_badi ~ compute. 


Tr 


FIELD - SYMBOLS «1 Ocalyear > TYPE ANY. "会 计 年 度 
FIELD -SYMBOLS <1 kOxssl > TYPE ANY. "数量 
FIELD -SYMBOLS «1 kOxsjg > TYPE ANY. "单价 
FIELD - SYMBOLS «1 k0xsje > ТҮРЕ ANY. "金额 
* 事先 通过 Break Point 的 方式 在 此 处 调试 出 需要 的 字段 对 应 的 位 置 ,并 且 赋 值 给 全 局 变量 p_ 
cha/p. kyf 
* BREAK - POINT 


p. cha Ocalyear = 7. 
p. kyf. kOxssl = 14. 
p. kyf. kOxsjg = 13. 
p. kyf. kOxsje = 12. 


+ 会 计 年 度 
ASSICN COMPONENT p_cha_0calyear 
OF STRUCTURE c. s data TO «1 Ocalyear >. 
+ 数量 
ASSIGN COMPONENT p kyf kOxssl 
OF STRUCTURE c. s data ТО «1 kOxssl >. 
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ж 单价 
ASSIGN COMPONENT p. kyf. kOxsjg 
OF STRUCTURE c. s data ТО «1 kOxsjg >. 
* 金额 
ASSIGN COMPONENT p. Ку kOxsje 
OF STRUCTURE c. s data ТО «1 kOxsje >. 


IF «1 К0хвві > IS ASSIGNED AND «1 kOxsjg > IS ASSIGNED AND «1 kOxsje > IS AS- 
SIGNED. 
IF «1 kOxssl> < > 0. 
<1_ kOxsjg >= «l kOxsje >/ «1. kOxssl >. 
ELSE. 
«] k0xsjg > = 0. 
ENDIF. 
ENDIF. 


ENDMETHOD. 


在 数据 和 查询 定义 都 与 V_1 及 其 查询 相同 的 情况 下 ， 执 行 代码 后 即 可 看 到 查询 结 
如 图 6-27 所 示 。 


aaan uus 


虚拟 指标 V_2 的 查询 上 次 数据 更 新 : 2012.07.24 10:39:25 


КЕЕ ЭЕ ЕЕЕ ЕД ТІ ЕЕ ЛЕГЕ ЕЕНЕЯЗ1 


ET 公司 代码 | 物料 日 历年 ”销售 效 量 “销售 价格 аем 
E =й sg 464 234509876 2010 | 3.00TON| 20.40 CNY| 67.92 CNY 
ЕНЕ а sg 2011 S.00TON| 18.41 CNY 84.87 CNY 
r7 вт [d sg 2042 | 500TON| 13.38СМҮ 71.99 CNY 
2043 | 500TON| 1566 CNY| 85.32 CNY 
xa 2014 2400704 22.55 CNY | 97.17 CNY 
жей 图 | № 2015 300TON| 172CNY| 541CNY 


7 自由 特性 2016 3.00 TON 1.11 СМҮ| 3.77 CNY 
2017 1.00ТОМ 41.02 CNY | 22.56 CNY 

2018 9.00 ТОМ 0.32 СМҮ/ 3.04 CNY 

2019 4.00 TON 2.31 СМҮ/ 8.99 CNY 

67898765678 2010 10.00 ТОМ 4.85 СМҮ 47.37 СМҮ 

2011 7.00 ТОМ 3.37 СМҮ 23.06 СМҮ 


2012 1.00 ТОМ 75.73 CNY | 81.03 CNY 
2013 3.00 TON| 33.74 CNY | 93.46 CNY 
2014 1.00 ТОМ 11.02 СМҮ | 14.65 CNY 
2015 7.00 ТОМ) 13.00 CNY 96.82 CNY 
2016 4.00 ТОМ) 10.20 СМҮ 43.96 CNY 


2017 9.00 ТОМ 9.52 СМҮ | 88.13 СМҮ 
2018 2.00 ТОМ 19.45 CNY | 42.59 CNY 
2019 7.00ТОМ/ 10.63 CNY | 69.17 CNY 


图 6-27 (ҚЫЗУ 2muhssu 


pu 


6.3.4 单元 小 结 


由 于 虚拟 关键 指标 的 计算 和 处 理 是 在 报表 运行 的 过 程 中 进行 的 ， 因 此 很 多 时 候 需 要 这 样 
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的 处 理 ， 如 需要 对 报表 的 结果 进行 非常 复杂 的 计算 ， 而 这 些 计算 同时 在 查询 的 定义 中 又 难以 
实现 ， 因 此 使 用 虚拟 关键 指标 的 优点 在 于 用 户 可 以 根据 实际 情况 ， 完 成 那些 在 数据 上 载 过 程 
中 难以 确定 的 逻辑 ， 如 库 位 的 库存 数量 。 

但 是 同时 ， 由 于 我 们 编写 的 例 程 是 针对 每 一 条 报表 结果 记录 来 进行 的 ， 因 此 如 果 报 表 结 
果 数 据 量 过 大 ， 同 时 又 有 非常 频繁 的 数据 库 的 访问 量 ， 那 么 在 实施 虚拟 关键 指标 之 前 必须 使 
用 生产 数据 进行 场景 的 模拟 ， 和 否则 就 会 导致 查询 使 用 率 低 下 ， 从 而 影响 整体 项 目 实施 的 成 果 


交付 。 
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71% ”报表 中 的 功能 增强 


前 面 章节 重点 讨论 了 数据 的 清洗 和 转换 ， 包 括 在 ЕВР 系统 中 的 数据 源 增强 ， 以 及 BW 
系统 的 转换 和 DTP 中 涉及 的 АВАР 例 程 的 编写 。 在 实际 的 项 目 中 ， 最 后 的 目标 总 是 通过 BW 
查询 的 方式 将 数据 展示 出 来 ， 或 通过 BW 查询 制作 MDX 语句 的 方式 将 数据 传输 到 目标 系统 
中 ， 因 此 有 必要 将 查询 中 的 例 程 增强 进行 说 明 。 查 询 中 的 例 程 主要 包括 对 于 变量 的 处 理 以 及 
最 终结 果 展 示 上 的 其 他 处 理 ， 由 于 在 工作 敌 上 的 其 他 处 理 主要 是 以 УВА 的 方式 进行 ， 因 此 
本 章 将 主要 对 查询 变量 的 处 理 、 报 表 跳 转 的 变量 赋值 、 将 查询 的 МОХ 输出 封装 为 КЕС 等 功 


能 进行 介绍 


7.1 报表 变量 出 口 的 ABAP 增强 实施 


7.1.1 应 用 场景 描述 

例如 ， 有 一 个 查询 有 以 下 变量 : 当前 月 〈 用 于 当月 产量 和 销量 的 限制 ) 、 上 年 同期 (用 
于 上 年 同期 产量 和 销量 的 限制 ) 、 当 年 上 月 (用 于 上 月 产量 和 销量 的 限制 ) 和 上 年 最 后 一 月 
(用 于 确定 年 初 库存 ) 。 假 设 ， 我 们 让 用 户 不 断 地 输入 这 些 变量 ， 显 而 易 见 的 是 ， 用 户 会 提 
出 一 个 想法 : “这 么 多 的 日 期 变量 要 输入 ， 系 统 就 不 能 根据 输入 的 当前 年 月 自动 推算 出 来 
么 ， 甚 至 当前 月 度 都 不 需要 输入 ， 而 是 让 系统 自动 获取 ”。 


7.1.2 О EXIT SAPLRSRO 001 的 接口 说 明 


在 BW 系统 中 ， 存 在 对 应 的 增强 User Exit RSR00001 供用 户 自 定义 增强 。 在 出 口 
RSR00001 F, RA 1 个 对 应 的 功能 模块 ， 即 EXIT. SAPLRSRO. _001。 下 面 将 对 EXIT_ 
SAPLRRSO 001 进行 详细 的 分 析 。 图 7-1 所 示 的 是 报表 对 于 用 户 出 口 的 调用 顺序 。 


第 一 次 调用 用 户 出 口 


系统 弹出 对 话 框 ， 让 用 书 输入 可 输入 变量 
(变量 设计 时 勾 选 了 “已 准备 输入 ” 复 选 框 ) 


第 二 次 调用 用 户 出 


(未 赋值 的 强制 输入 变量 和 未 赋值 的 文本 变量 ) 


第 三 次 调用 用 户 出 
(对 变量 进行 各 种 检查 ) 


图 7-1 报表 的 调用 顺序 
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CD 输入 参数 


I VNAM 变量 名 称 
I VARTYP 变量 类 型 
I IOBJNM 信息 对 象 
I S COB PRO 信息 对 象 属性 
I S RKBID 控制 条 OLAP 处 理 器 
I PERIV 会 计 年 度 变 式 
I T VAR. RANGE 已 有 变量 的 RANGE 表 
I STEP 报表 执行 步 又 
D 输出 参数 
Е Т БАХСЕ 目标 变量 RANGE 表 
Е МЕЕНТ ЕД РА 
Е_МЕЕАС 单位 的 小 数位 数 
E WAERS 货币 码 
E WHFAC 货币 小 数位 数 
@ 变更 
C S CUSTOMER ”查询 变量 的 处 理 类 型 结构 


从 上 述 参 数 可 以 看 出 ， 该 用 户 出 口 的 主要 参数 是 L_STEP 报表 运行 步 又、 输入 参数 中 的 
I T VAR. RANGE 和 现 有 变量 RANGE 表 、 输 出 参数 中 的 E_T_RANGE 表 。 在 实际 的 项 目 中 
也 是 这 些 参 数 起 到 了 主要 作用 。 


7.1.3 xf I STEP -0 的 处 理 


I STEP =0 的 处 理 逻 辑 不 会 在 报表 变量 的 处 理 中 出 现 ， 只 有 在 权限 检查 或 监控 中 可 以 看 
到 ， 因 此 在 项 目 中 极 少 使 用 。 为 了 展示 LSTEP 在 各 种 值 情况 下 的 系统 处 理 ， 这 里 以 权限 赋 
值 为 例 予 以 说 明 ， 代 码 段 如 下 。 


*I STEP =0 的 代码 
CASE i vnam. 
WHEN ZGMGRANT . ^" Query field name 
IFi step =0. 


CLEAR wa | etrange. 
* 从 自 定义 表 获 得 授权 值 
SELECT grant nbr 
FROM zgmusergrants 
INTO CORRESPONDING FIELDS OF TABLE it  zgmusergrants 
WHERE uname EQ sy — uname. 
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* fE IL STEP 20 ҤЕ]? E T. RANGE 赋值 
LOOP AT it. zemusergrants INTO wa, zgmusergrants. 
wa etrange — sign = T. 
wa, etrange — орі = EQ . 
CALL FUNCTION CONVERSION EXIT ALPHA INPUT 
EXPORTING 
input = wa, zgmusergrants 一 grant. nbr 
IMPORTING 
output - wa, zgmusergrants - grant, nbr. 
wa, etrange — lw = wa, zgmusergrants — grant nbr. 
APPEND wa, etrange TO e t range. 
ENDLOOP. 
ENDIF. 
ENDCASE. 


7.1.4 xf I STEP =1 的 处 理 


过 程 号 I_STEP =1 时 ， 此 时 系统 还 没有 弹出 变量 输入 对 话 框 ， 因 此 可 以 使 用 当前 
日 期 或 能 够 自动 派生 的 数据 对 变量 予以 赋值 。 例 如， 在 用 户 运 行 报 表 之 后 ， 输 入 变 
量 之 前 ， 系 统 根据 当前 日 期 自动 填充 年 变量 和 月 变量 ， 默 认可 以 设置 为 当月 或 上 一 
月 等 。 

对 于 这 类 变量 ， 必 须 定义 为 “客户 出 口 ” 类 型 ,并且 在 “明细 ”标签 页 中 ， 勾 选 “ 变 
量 已 准备 输入 ” 复 选 框 ， 对 应 的 变量 定义 如 图 7-2 和 图 7-3 所 示 。 


ШЕТ АЕ ШЕГІ | тив ER 


使 用 标准 文本 
技术 名 称 
GICALMONTH DZ MIS 
全 局 设置 
变量 类 型 
特性 值 
处 理由 
客户 出 
参考 特性 
[OCALMONTH] 日 历年 /月 


图 7-2 报表 变量 的 定义 1 


针对 这 一 类 变量 的 代码 增强 实施 ， 需 要 在 LSTEP =1 时 行 ， 因 此 对 应 的 逻辑 处 理 代码 段 
如 下 。 
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一 般 的 | 车 换 路 径 | 


ала | 货币 /单位 | 高 级 


基本 设置 
SER 
单 值 
变星 是 


强制 的 
变 蛙 已 准备 输入 


变量 无 上 下 文 


个 性 化 
ЕГ ДЕ EBR: Tt Tania 


{7-3 ”报表 变量 的 定义 2 


жІ STEP =1 的 代码 
*& 


* & 包括 ZXRSRUOI 
*& 


* 全 局 变量 定义 
DATA:1 s range ТҮРЕ rsr_s_rangesid. 
DATA :loc var. range LIKE rrrangeexit. 


DATA :1 year(4) TYPE n, 
1 month(2) TYPE n, 
1 calmonth(6) ТҮРЕ n, 
1 date(8) TYPE n, 
* 先 获得 当前 日 期 信息 START 


l_date = sy - datum. 

]_year = 1 date +0(4). 

] month 21 date +4(2). 

1 calmonth 21, date +0(6). 


CASE 1 vnam. 
* 获得 当前 年 和 月 
WHEN GICALMONTH DZ MIS. 
IF i step = 1. 


1 s range — low 2], calmonth. 


l s range — sign m 


1 s range — opt = FQ . 


"本 地 RANGE 操作 结构 
"从 і t var range 获取 的 RANGE 数据 
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APPEND 1, s range TO е t range. 


ENDIF. 
* 获得 当前 年 
WHEN GICALYEAR рх MIS. 
IF i step = 1. 


1 s range — low = l_year. 


l s range — sign =I. 


l_s_range — opt = EQ. 


APPEND 1, s range TO e 1 range. 


ENDIF. 


WHEN OTHERS. 


ENDCASE. 


执行 上 述 代码 后 ， 当 运行 查询 之 后 ， 弹 出 变量 输入 窗口 之 前 ， 此 时 系统 已 经 对 变量 进行 
了 赋值 ， 因 此 变量 输入 窗口 会 有 默认 值 ， 如 果 无 须 更 改 默认 值 ， 则 直接 运行 查询 即 可 。 报 表 
变量 输入 窗口 如 图 7-4 所 示 。 


Variables for Ad Hoc Report 
С G1CALYEAR DZ MIS (*) 2012 


图 7-4 报表 变量 输入 窗口 


7.1.5 过 程 号 I_STEP =2 的 处 理 


过 程 号 LSTEP =2 时 ， 此 时 系统 已 经 弹出 了 变量 输入 对 话 框 ， 并 且 用 户 也 已 经 输入 了 相 
关 的 变量 值 ， 单 击 了 运行 按钮 。 因 此 ， 此 时 可 以 使 用 用 户 已 输入 的 变量 值 派 生出 其 他 需要 赋 
值 的 用 户 出 口 变量 。 例 如 ， 用 户 在 输入 变量 并 单 击 运行 报表 后 ， 系 统 根据 输入 的 日 历年 月 自 
动 填充 去 年 同期 的 日 历年 月 和 当年 第 一 个 日 历年 月 等 。 

对 于 这 类 变量 ， 必 须 定 义 为 “客户 出 口 ” 类 型 ， 并 且 在 “明细 ”标签 页 中 ， 不 匀 选 
“变量 已 准备 输入 ” 复 选 框 ， 对 应 的 变量 定义 如 图 7-5 和 图 7-6 所 示 。 

针对 这 一 类 变量 的 代码 增强 实施 ， 需 要 在 1_STEP =2 时 执行 ， 因 此 对 应 的 逻辑 处 理 代码 
段 如 下 。 
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一 般 的 | 痊 换 路 径 | 明细 “| 默认 值 | 货币 /单位 | 高 级 

gut 
根据 输入 年 月 得 到 上 年 同 其 
使 用 标准 文本 

技术 名 称 

GICALMONTH 5ТЕ MUS 

全 局 设置 

БЕЛ 

特性 值 

处 理由 

客户 出 口 

эн 

[ШСАТМОНТН] АБ 


N 


7-5 报表 变 


El 


的 定义 1 


一 般 的 | 车 换 路 径 | НЕШ 。 | 默认 值 | 货币 /单位 | 高 级 
基本 设置 


= шт 


ЗІҢ 


变量 无 上 下 区 
个 性 化 
ESTERI EIE 


图 7-6 报表 变量 的 定义 2 


жІ STEP =2 的 代码 
* 根据 输入 年 月 得 到 年 度 
WHEN GICALYEAR DZ MUS. 
IF i step 22. 


LOOP AT i t var range INTO loc var range WHERE vnam = GICALMONTH. DZ MIS . 
CLEAR 1 s range. 
l s range — low = loc, var, range — low + 0(4). 


l s range — sign ЕТ. 


l s range - opt = EQ. 


APPEND 1, s range ТО e t range. 
EXIT. 
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ENDLOOP. 


ENDIF. 
s 根据 输入 年 月 得 到 上 年 同期 
WHEN GICALMONTH SNTQ MUS . 
IF i step 22. 
LOOP AT i t var range INTO loc var range WHERE vnam = GICALMONTH, DZ MIS . 


CLEAR 1 s range. 


1 year 2loc var range - low 4 0(4). 
1 year 21 year - 1. 
1 month = loc, var range – low +4(2). 


CONCATENATE 1. year 1 month INTO 1, calmonth. 


1 s range — low = 1 calmonth. 


: ; 2 
l s range — sign =ї. 


l s range - opt = EQ. 


APPEND 1, s range TO e t range. 
EXIT. 
ENDLOOP. 


ENDIF. 
* 根据 输入 年 月 得 到 上 年 12 月 
WHEN GICALMONTH SNZHY MUS. 
IF i step = 2. 
LOOP AT i t var range INTO loc var range WHERE vnam = GICALMONTH. DZ MIS . 


CLEAR | s range. 

1 year 2loc var range – low 4 0(4). 

1 year 21 year - 1. 

1 month = 12. 

CONCATENATE 1. year 1 month INTO 1, calmonth. 


1 s range — low 2l, calmonth. 


l s range — sign =I; 


l s range - opt = EQ. 
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APPEND 1. s range TO е t range. 
EXIT. 
ENDLOOP. 


ENDIF. 
ж 根据 输入 年 月 得 到 本 年 1 月 
WHEN GICALMONTH BNDYY MUS. 
IF i step 22. 
LOOP AT i t var range INTO loc var range WHERE vnam = GICALMONTH. DZ MIS . 


CLEAR 1 s range. 

1 year 2loc var range – low 4 0(4). 

] month = Of . 

CONCATENATE 1. year 1 month INTO 1. calmonth. 


1 s range — low 2], calmonth. 


l s range — sign £I; 


l s range - opt = EQ. 
APPEND 1. s range TO e t range. 
EXIT. 


ENDLOOP. 


ENDIF. 


7.1.6 


过 程 号 I_STEP =3 的 处 理 


过 程 号 L_STEP =3 时 ， 此 时 用 户 已 经 执行 了 变量 的 输入 ， 并 且 系 统 已 经 根据 用 户 输入 的 
变量 值 对 查询 中 相关 的 其 他 变量 进行 了 赋值 。 因 此 ， 此 时 更 多 的 是 对 已 经 赋值 的 变量 进行 检 
查 ， 如 月 份 是 否 大 于 12、 范 围 下 限 是 否 超 过 了 范围 上 限 等 ， 示 例 代码 如 下 。 


* I_STEP =3 的 代码 
IF i_step =3. 


IF i s rkbld - compid EQ SINOCO1, 00001. 


LOOP AT i. t, var. range INTO loc. var. rangge WHERE vnam EQ  GICALMONTH, SNZHY _ 
MUS. 


l_calmonth = loc, var, range - low. 
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] month 21 calmonth +4(2). 


IF sy - subrc NE 0 OR 1, calmonth IS INITIAL OR 1 month > 12. 


CALL FUNCTION RRMS MESSAGE HANDLING 


EXPORTING 
i class = RSBBS 
itype = E 


i number = 000 
i_msgvl = 至 少 需要 输入 一 个 值 . 
EXIT. 
ENDIF. 
ENDLOOP. 


ENDIF. 


ENDIF. 


7.1.7 单元 小 结 


对 于 报表 变量 的 处 理 ， 特 别 是 针对 决策 者 的 报表 变量 ， 建 议 首先 还 是 由 系统 根据 权限 、 
或 当前 日 期 给 出 默认 值 ， 这 样 用 户 可 以 直接 单 击 运行 ， 甚 至 对 一 切 变 量 都 进行 默认 赋值 ， 无 
须 输 入 或 执行 任何 动作 ， 便 可 看 到 结果 ， 这 对 于 刚 开 始 使 用 报表 的 用 户 来 说 十 分 重要 。 如 果 
让 用 户 输入 了 太 多 其 从 未 接触 过 的 变量 ， 可 以 想象 其 会 对 系统 产生 一 些 抵制 情绪 。 

而 对 于 报表 变量 的 实施 ， 从 实际 的 项 目 经 验 来 看 ， 如 果 想 真正 地 对 这 块 的 权限 予以 
控制 和 管理 ， 则 必须 进行 专人 管理 ， 同 时 使 用 离线 文档 予以 保存 ， 并 实时 更 新 文档 ， 否 
则 ， 出 现 的 后 果 就 是 ， 看 起 来 毫 不 相关 的 两 个 变量 定义 ， 居 然 里 面包 含 的 内 容 是 一 样 的 ， 
而 后 面 的 人 不 知道 到 底 是 使 用 A 变量 ， 还 是 使 用 B 变量 ， 所 以 就 又 新 建 了 一 个 C 变量 供 
自己 使 用 。 


7.2 报表 跳 转 的 АВАР 增强 实施 


7.2.1 应 用 场景 描述 


在 BW 标准 的 报表 跳 转 维护 RSBBS 中 ， 可 以 给 跳 转 目标 设置 传输 方法 ， 包 括 表 字段 、 
信息 对 象 、URL 参数 、 变 量 、 删 除 和 通用 。 有 时 ， 我 们 可 能 并 不 希望 直接 将 数据 带 到 目标 
中 ， 如 有 BCS 应 用 控制 范围 是 1000， 但 是 实际 的 每 个 分 公司 的 控制 范围 不 一 样 ， 如 是 7001 
和 Z002 ， 当 需要 从 汇总 表 跳 转 到 明细 表 时 ， 需 要 将 控制 范围 切换 到 Z001 或 Z002 ， 此 时 就 需 
要 使 用 增强 功能 。 
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7.2.2 实施 步 又 详解 


步骤 分 析 : 

1) 将 成 本 控制 范围 从 1000 转 到 7001 和 Z002, 

2) 将 汇总 BCS 信息 块 的 对 象 0BCS_PRCTR 的 值 赋 给 信息 块 OPCA_C01 的 OPROFIT_CTR。 

首先 ， 使 用 事务 码 SE19 进入 实施 的 定义 界面 ， 选 中 “Classic BAdI” 单 选 按钮 ， 在 
“ВА! Name” 中 输入 “SMOD_RSR00004”， 单 击 创建 按钮 进行 实施 的 创建 ， 如 图 7-7 所 示 。 


E 


Enhancement Implementation Edit Goto Utilties(M) Environment 系统 (Y) 帮助 (H) 


@ пао езе Вав веке ОА 


BAdI Builder: Initial Screen for Implementations 
| | 


Edit Implementation .- 


@ New BAdI 
Enhancement Implementation A 


O Classic BAdI 
Implementation | 


бе Display | 2 Сһапде | 


Create Implementation 一 


O New BAdI 
Enhancement Spot 


@ Classic BAdI 
BAdI Name SMOD RSRO0004 


0 Create Impl. 


7-7 BADI 实施 的 创建 


在 弹出 的 对 话 框 中 ,输入 实施 的 技术 名 称 “ZCL_IM_VARIANT_IMPLT”， 如 图 7-8 
所 示 。 


Ге? Business Add-In Builder: Create Implementation 
Definition Name SMOD_RSR00004 
Implementation Мате | |ТСІ. IM VARIANT INPLT[S) 


图 7-8 实施 ZCL IM VARIANT IMPLT 的 创建 


了 02 


进入 “Interface” 标 签 页 后 可 以 看 到 ， 在 实施 下 面 存在 两 个 方法 ， 即 EXIT SAPLRSBBS _ 
001 ЯП EXIT SAPLRSBBS 002, ， 如 图 7-9 所 示 。 


Business Add-In Builder: Display Implementation ZCL_IM_VARIANT_IMPLT 


Ee rr 


| (ZCL ІШ VARIANT IMPLT| Inactive 
Implementation Short Text НЕЗ ИТНА 
Definition Name SMOD RSROO004 


Interface name |IF EX SMOD RSR00004 
Name of implementing class: (ZCL IM CL IM VARIANT IMPLT 
ш] 
Т) BW: BBS-Feldmapping [| 
ABAP Z BW: BBS Customer Exit, gerufen vor dem A 
š 
a 
a 
š 二 
a (”| 
C o o || гг 


7-9 实施 中 的 两 个 方法 


要 实现 场景 描述 中 所 期 待 的 功能 ， 需 要 在 第 一 个 方法 中 实施 如 下 代码 段 。 


METHOD if_ex_smod_rsr00004 ~ exit, saplrsbbs 001. 


ж 将 控制 范围 1000 使 用 Z001 和 7002 代替 
DATA:]_s_thx_mapping ТҮРЕ rsbbs sx map by exit, 
1 s range TYPE rrrangesid. 


FIELD -SYMBOLS: <1 вх mapping > TYPE rsbbs, sx mapping. 
* 在 源 QUERY 中 ,所 有 的 控制 范围 都 是 1000 ,在 目标 范围 中 ,将 控制 范围 划分 为 Z001 和 7002 
READ TABLE i thx receiver WITH KEY fieldnm = 0CO_AREA 

ASSIGNING «l sx mapping >. 

CHECK sy - subre = 0. "如 果 有 这 个 字段 


l_s_thx_mapping - fieldnm from = «1 sx mapping > - fieldnm. " 源 字 上 段 

] s thx mapping - fieldtp_from = rsbbs_c_fieldtp — infoobject. " 源 字段 类 型 
l_s_thx_mapping - fieldnm to = ОСО_АВЕА. "目标 字段 
l_s_thx_mapping - fieldtp_to = rsbbs_c_fieldtp - infoobject “目标 字段 类 型 


x* 填充 值 RANGE 
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l s range-signz I. 

l s range - opt = EQ . 

1 ѕ range — low = 7001. 

APPEND 1 s range TO 1 s thx mapping - range. 
1 ѕ range — low = 7002. 

APPEND 1 s range TO 1 s thx mapping - range. 


INSERT 1. s thx mapping INTO TABLE e thx mapping. 


* 匹配 信息 对 象 0OBCS_PRCTR 5l ОРКОЕІТ_ СТК 
CLEAR l1 s thx mapping. 
CLEAR 1 6 range. 
READ TABLE i thx sender WITH KEY fieldnm = OBCS PRCTR 
ASSIGNING «l sx mapping >. 
CHECK sy - subrc = 0. "如 果 有 这 个 字段 
l_s_thx_mapping - fieldnm to = OPROFIT_CTR . " 目标 字段 
* 将 利润 中 心 20000 ~ 29 999 归 集 到 控制 范围 Z002 ,其 他 的 归 集 到 7001 
LOOP AT «l sx mapping > —range INTO 1 s range. 
IF 1 s range - low +4(10) > = 0000020000 AND 
l s range - low +4(10) < = 0000029999 . 


CONCATENATE 7002 1 s range -low - 4(10) INTO 1 s range - low. 
ELSE. 
CONCATENATE 7001 1 s range -low - 4(10) INTO 1 s range - low. 
ENDIF. 
APPEND 1 s range TO 1 s thx mapping - range. 
ENDLOOP. 


APPEND 1 s range TO 1 s thx mapping - range. 
INSERT 1. s thx mapping INTO TABLE e thx mapping. 


ENDMETHOD. 


7.2.3 单元 小 结 


报表 跳 转 在 实际 的 项 目 中 使 用 较 多 ， 特 别 是 特大 型 的 集团 性 企业 ， 往 往 需 要 从 汇总 报表 
跳 转 到 明细 报表 ， 而 跳 转 的 过 程 中 ， 在 少数 情况 下 需要 人 工 增加 相关 的 限制 条 件 ， 此 时 就 需 


要 使 用 跳 转 接口 中 的 代码 增强 实施 。 


fr SAP 收购 了 Business Object 后 ， 更 多 的 汇总 报表 会 以 Dashboard 图 形 化 的 方式 予以 展 
现 ， 此 时 从 Dashboard 跳 转 到 Webi 明细 报表 可 以 使 用 SAP 标准 的 OpenDocument 方法 予以 实 
现 ， 详 见 ВОВ] 相关 文档 ; 而 从 Dashboard 跳 转 到 Bex Query 则 可 以 使 用 标准 的 URL 拼接 的 


方式 予以 实现 ， 详 见 ЗАР BW Online Help 相关 文档 。 


SAP Business ObjectViewing Documents Using OpenDocument 在 线 文 档 链 接地 址 为 : 
http ://help. вар. com/businessobject/product_guides/boexir4/en/xi4_opendocument_en. pdf, 
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SAP BW Help 在 线 文档 链接 地 址 访问 目录 为 : SAP Help Portal — Technology 一 SAP 
Netweaver Platform 一 "7. 4 一 SAP Business Warehouse 一 SAP Business Explorer Bex Web Applica- 


tion Designer 一 Web Design API 一 Commands 一 Commands for Web Templates, 


7.3 通过 邮件 发 送 查 询 结果 


7.3.1 应 用 场景 描述 


尽管 BW 7. X 提供 了 标准 的 Information Broadcasting 工具 将 查询 的 结果 以 HTML 或 PDF 的 
方式 发 送 到 前 端 Enterprise Portal 或 邮箱 ， 但 是 ， 有 时 用 户 希 望 以 更 加 灵活 的 方式 来 发 送 查 询 结 
果 ， 如 在 发 生 某 个 具体 的 事件 或 执行 了 相应 的 动作 后 便 立 即 发 送 通知 到 相关 人 等 。 


7.3.2 实施 步骤 详解 
创建 函数 组 ZEMAILQUERY， 具 体 如 图 7-10 所 示 。 


蕊 创建 功能 组 
函数 组 OOo ZEMAILQUERY 
函数 组 短文 本 。 ”| 将 QUERY 结 果 以 HTML 的 方式 发 送 邮件 | 
负责 人 员 PAHXIE| 

v^ 保存 


7-10 发 送 邮件 函数 组 ZEMAILQUERY 的 创建 


进入 修改 函数 组 并 激活 主 程序 ， 如 图 7-11 所 示 。 


E 
| 程序 (P) 编辑 (E) 转 到 (6) Utilties(M) Environment 系统 (Y) 帮助 (H) 


多 тап 60e BAR аъла ага 


ABAP 编 辑 器 :显示 Functionpool SAPLZEMAILQUERY 
ЕШ leh ee | ы н) 


Functionpool [SAPLZENAILQUERY | 活动 的 


ТЕЕ ole] ШЕ ЕЕ 


ЗЕЕ Е Е ЕЕ Е Е Е Е Е ЕЕ Е ЕЕ ЕЕЕ Е ЕЕ Е ЕЕЕ Е ЕЕ ЕЕЕ ЕЕЕ Е ЕЕЕ ЗЕЕ Е ЗЕЕ ЗЕЕ ЗЕ 


ж System-defined Include-files. * 
жЕКЕ ЗЕ ЗЕ ЗЕ ЗЕ ЗЕ ЗЕ hehehe koe koe ЗЕ ӘЗ ЗЕ ЗЕ А ЕЕ ЗЕ ЖӘЕ 
INCLUDE LZEMAILQUERYTOP. ” Global Data 
INCLUDE LZEMAILQUERYUXX. * Function Modules 


Ekk kkk kkk kkk kkk kkk kkk kkk Е Е Е ЕЕ ЕЕЕ Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е Е ЕЕ Е ЕЕЕ ЕЕ ЕЕЕ 


ж User-defined Include-files (if necessary). * 
ed 
* INCLUDE LZEMAILQUERYF... * Subprograms 
* INCLUDE LZEMAILQUERYO... ^ PBO-Modules 
* INCLUDE LZEMAILQUERYI... ^ PAI-Modules 


7-11 函数 的 主 程序 
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在 函数 组 ZEMAILQUERY 中 创建 函数 Z EMAIL QUERY RESULT, 1 7-12 所 示 。 其 
中 ， 函 数 的 输入 参数 设置 如 图 7-13 所 示 ， 表 参数 设置 如 图 7-14 所 示 。 


[E 


Function Module Edit Goto Utiities(M) Environment 系统 (Y) #EFBB(H) 


J ін соөІБИиБмІгтае mm ФЕ 
Function Builder: Initial Screen 


аё) 1 Jf] Н W| I| B2|| Reasson... | 


Function Module Z EMAIL QUERY RESULT © 


图 7-12” 发送 邮件 函数 Z_EMAIL_QUERY_RESULT 的 创建 


Function module |Z EMAIL QUERY RESULT Active 


SENDER ID YPE AD SMTPADR = L] 包子 邮件 地 址 | | 
SUBJECT ҮРЕ БО ОБТ DES 0/0 内 容 的 漳 短 描述 |] 
Пп = 


7-13 ЯЖЮША 


[= 
Function Module Edit Goto  Utiities(M) Environment 系统 (Y) 帮助 (H) 


КЕХҮЗТОЈЕВҮ z 
E BCS: & SMTP 地 址 的 内 部 表 
А 


BLE OF STRINGS TER 


图 7-14 函数 的 表 参 数 
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函数 Z_EMAIL QUERY. RESULT 的 内 置 代 码 如 下 。 


* 通过 HTML 邮件 方式 发 送 QUERY 结 
FUNCTION z_email_query_result. 


ж 


ж" æ" Local interface; 


ж" IMPORTING 


жн REFERENCE(SENDER ID) ТҮРЕ AD SMTPADR 
жн REFERENCE(SUBJECT) ТҮРЕ SO ОВ) DES 

ж" TABLES 

жн QUERY PARAMS ТҮРЕ RRXW3TQUERY 

жн RECEPIENTS ТҮРЕ  BCSY SMTPA 

ж RETURN TYPE TABLE OF STRINGS OPTIONAL 
ж" 


DATA :tmp. str TYPE string . 

IF NOT recepients| | IS INITIAL . 
MOVE: text/html TO content, type . 
CLEAR :e r page,result, content . 
CALL FUNCTION RRW3 WEBRFC 


IMPORTING 
e r page те r page 
TABLES 
query. string - query, params 
CHANGING 
return. code = return. code 
content type — content, type 
content length = content. length. 


result. content тет page —» n sx output — string. 

REPLACE ALL OCCURRENCES OF /webrfc/bw30 IN result, content WITH /sap/bw/Mime/ 
BEX . 

REPLACE ALL OCCURRENCES OF mime/BEx/StyleSheets/ IN result. content WITH /sap/ 
bw/mime/ BEx/StyleSheets/ . 

CLEAR tmp str . 

CONCATENATE 
' «meta http – equiv = " content — type" content = " text/html; charset = iso – 8859 – 1" > 
cl abap char utilities = > cr lf 

' < script type = " text/javascript" src = "/sap/bw/Mime/ BEx/JavaScrip/JSBW | C. Sid. js" > 

< /script > 


cl abap char utilities = > сг 1f INTO tmp str. 
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REPLACE ALL OCCURRENCES OF < meta http — equiv = " content — type" content = " text/ht- 

ml; charset = iso - 8859 – 1" > 
IN result, content WITH tmp. str . 

CLEAR tmp str . 

REPLACE ALL OCCURRENCES OF BWhReports ie5. css IN result. content WITH BWhReports | 
1еб. css . 

REPLACE ALL OCCURRENCES OF Mime/BEx/StyleSheets/ IN result. content WITH /sap/ 
bw/Mime/ BEx/StyleSheets/ . 

REPLACE ALL OCCURRENCES OF Mime/BEx/Icons/ IN result, content WITH /sap/bw/ 
Mime/ BEx/Icons/ . 

REPLACE ALL OCCURRENCES OF /sap/bw/Mime/BEx/icons/ IN result, content WITH / 
sap/bw/Mime/ BEx/Icons7 . 

CLEAR :server, рогі. 

CALL FUNCTION TH GET VIRT HOST DATA 


EXPORTING 
protocol =1 
virt_idx -0 
IMPORTING 
hostname = server 
port = port 
EXCEPTIONS 
not, found ES! 
internal error. -2 
OTHERS =3; 


CLEAR tmp str . 

CONCATENATE http :/V servet ': рогі /sap/bw/ INTO tmp str . 

REPLACE ALL OCCURRENCES OF /sap/bw7 IN result. content WITH tmp. str . 
CLEAR tmp str . 

CLEAR: conlength , conlengths . 

conlength = STRLEN( result, content ) . 

conlengths = conlength . 

REFRESH text . 

CALL FUNCTION SCMS STRING. TO FTEXT 


EXPORTING 
text = result. content 
TABLES 
Пехі tab = text. 
TRY. 


CLEAR send. request . 
send, request = cl, bes = > create persistent( ). 
CLEAR document . 


document = cl, document, bes = > create, document( 
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i_type = НТМ 
1 text = text 
i length = conlengths 
i subject = subject). 
ж 添加 文档 到 邮件 

CALL METHOD send request – > set, document( document ). 
CLEAR sender . 
sender = cl cam, address bes = > create, internet, address( sender. id ). 
CALL METHOD send, request - > set, sender 

EXPORTING 

i sender = sender. 

CLEAR wa, rec . 
LOOP AT recepients INTO wa rec . 

CLEAR recipient . 

recipient = cl. cam, address, bes = > create, internet, address( 


wa, rec). 


* 添加 接收 方 地 址 信息 
CALL METHOD send request – > add. recipient 
EXPORTING 


1 recipient = recipient 


j express = X. 
ENDLOOP . 
CALL METHOD send, request —> set. status. attributes 
EXPORTING 

i requested, status = E 

i status mail Egg. 
CALL METHOD send request -> set, send immediately(" X ). 

* 发 送 文件 

CALL METHOD send request -> send( 
EXPORTING 
i with, error screen = X 
RECEIVING 


result = sent, to. all). 
IF sent. to all X . 
APPEND ЖОЛ A XX ИТ TO return . 
ENDIF. 
COMMIT WORK. 
CATCH сх bes INTO bes, exception. 
bes message = bes. exception —» веі text( ). 
APPEND bes, message TO return . 
EXIT. 
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ENDTRY. 
ELSE . 

APPEND 请 指定 发 送 方 邮 件 地 址 TO return . 
ENDIF . 


ENDFUNCTION. 


7.3.3 单元 小 结 


通过 将 发 送 邮件 功能 封装 为 标准 的 功能 模块 ， 我 们 能 够 在 任何 需要 的 地 方 调用 该 功能 模 
块 以 达到 发 送 邮 件 的 目的 ， 虽然 看 起 来 这 和 使 用 Information Broadcasting 只 是 具有 相同 的 功 
能 ， 但 是 在 有 些 情况 下 (如 有 工作 流 审批 ， 或 数据 处 理 需要 多 个 审核 步骤 等 灵活 的 需求 ) ， 
通过 程序 发 送 邮件 显得 尤为 必要 。 


7.4 报表 MDX 的 编写 


7.4.1 应 用 场景 描述 


项 目 组 有 两 个 开发 小 组 ， 一 个 小 组 对 BW 系统 进行 架构 和 开发 ， 男 一 个 小 组 对 前 端 界面 
和 . NET 程序 进行 处 理 ， 前 端 界 面 需 要 来 自 BW 系统 的 相关 数据 ， 因 此 两 个 系统 之 间 必 须 通 
过 接口 的 方式 进行 数据 交换 。 由 于 通常 情况 下 我 们 使 用 RFC 或 Web Service 的 方式 对 数据 进 
行 交换 ， 因 此 需要 将 报表 结果 通过 МОХ 编写 为 标准 的 输出 ， 然 后 封装 为 一 个 远程 调用 的 
RFC 功能 模块 。 


7.4.2 实施 步骤 详解 


要 实现 封装 MDX 的 ВЕС 函数 ， 必 须 按 照 以 下 步骤 对 系统 进行 设置 (以 查询 SINOCOI _ 
Q0001 为 例 ) 。 

第 1 步 : 明确 查询 的 输入 条 件 和 输出 结果 。 查 询 SINOC01_Q0001 的 输入 条 件 为 会 计 年 
度 范围 段 ， 如 图 7-15 所 示 。 查 询 的 输出 结果 如 图 7-16 所 示 。 


变量 用 于 FARE 
Ое 2000 212020 
[执行 |[ 检 查 | 


图 7-15 查询 SINOC01_Q0001 的 输入 条 件 


第 2 Ж: 在 事务 码 MDXTEST 下 测试 МОХ 语句 ， 编 写 测试 界面 如 图 7-17 所 示 。 


了 70 


ЕДД arar | ë= | ене | 


信息 块 SINOC01 第 一 个 QUERY 上 次 数据 更 新 : 2012.07.25 13:19:21 
er ^| [Zaka ë EE /(жйе | (| 
EX ат SE 欧洲 公司 2011 | 13.00 TON 
HE nE sg 2012 | 6.00 TON 
k RIA 2013 5.00 TON 
УЯ | 2014 | 14.00 TON 
е8 图 | № | 2015 13.00 TON 
7 自由 特性 | 12016 | 3.00 TON 
— СИИИ 2017 9.00 ТОМ 
2018 6.00 TON 
2019 15.00 ТОМ 


7-16 查询 5ІМОСОІ Q0001 的 输出 结果 


区 
| MDX 命令 “编辑 (E) 系统 (Y) 帮助 (H) 


[e :asHieaeiBammisessim om 

MDX 测试 编辑 器 

ШЕЕ 

目录 | a mg [e neam. a 
2 aj т ШЕ ЕЕ е ||: ШШЕН 


可 用 的 对 象 


= @ 信息 块 SNOC01 第 一 个 QUERY SINOCO1/SINOCO1 00001 EET 
> A AS [GOGSDM] - 
Р Bp СКЕЧ г || KIMeasures].[DDBLGSC701LBO Y YRBFEWDIYM] [Measures]. [DDBOBSFSP YWGJR92D82L93Y6]) 
Er = ELS 
销售 数量 Measures].[DDBLGSC7S01LBOYYRBFEWDIYM] ОСЫН ЕЕЕ 
销售 价格 Measures][DDBOBSFBPYVEVAXBGZVGITPOE] |_ po sawa 
销售 金额 Measures]. [DDBOBBFBP YWGJR92DB2L93Y6] 
S AE FROM SINOC01/SINOC01_Q0001 
5 | 
т 日 历年 1V000001] E SAP VARIABLES [!V000001] INCLUDING [üCALYEAR].[2011] 
2000 OCALYEAR]. [2000] 
2001 [OCALYEAR].[2001] | 
2002 [OCALYEAR].[2002] | 
2003 [OCALYEAR].[2003] = 
2004 [0CALYEAR].[2004] 2 
Жік ege] T 


7-17 MDX 语句 的 编写 测试 界面 


测试 的 MDX 语句 为 : 


SELECT 
| [4JIWSQ9 VK9M0OMQFZGO3CAXJKH ]. [4JHIVI UMRX82P3 YNDW2Q64 WGH | | 
ON COLUMNS, 

NON EMPTY 

[4JIWSPUIICELLHD34BYNQTMAX |. MEMBERS 

ON ROWS 
FROM R2YSHLFX/R2 R2YSHLFX B WQFYOOI 
SAP VARIABLES | ! V000001] INCLUDING [0CALMONTH ]. [201003 ] 


第 3 Ж. Е КЕС 函数 封装 МОХ ig, ВЕС 函数 的 属性 设置 如 图 7-18 М5, ЖШ 
的 输入 参数 设置 如 图 7-19 所 示 ， 输 出 参数 设置 如 图 7-20 所 示 ， 表 参数 设置 如 图 7-21 
所 示 。 
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[= 
Function Module Edit Goto  Utiities(M) Environment 系统 (Y) 帮助 (H) 


7 10 сае вив тле mm ош 


Function Builder: Change ZMDX SINOCO1 00001 
ТАШ Иш! ЫЕ ЕЕ | 
Function module Active 


Function Module [ 


ICD. т... 
读 取 查 词 SINOC01_Q0001 数 据 


O Normal Function Module PAHXIE 


© Remote fähiger Baustein Last Changed By 
O Update Module Changed on 2012. 07. 25 
@ 立 即 开始 开发 类 


图 7-18 RFC 函数 的 属性 设置 


=" 
Function Module Edit Goto Utiities(M) Environment 系统 (Y) 帮助 (H) 


2| — 1 cjiH eoe Bap ansam об 


Function Builder: Change ZMDX SINOCO1 00001 
ҮЛЕ НЫШ ЫН ЕЛЕЕ: 1 


Function module | ИХ SINOCO1 00001 | Inactive (revised) 


7-19 ВЕС 函数 的 输入 参数 


区 
Function Module Edit Goto Utilitie(M) Environment 系统 (Y) 帮助 (H) 


vi аи eoe DHR 200a о 
Function Builder: Change ZMDX SINOCO1 00001 
ЕЕЕ НЕШЕ | 


Function module |ТИрХ. SINOCO1 00001 | Inactive (revised) 


7-20 ВЕС 函数 的 输出 参数 
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[e 
| Function Module Edit Goto Utilties(M) Environment 系统 (Y) 帮助 (H) 


g s» 2B eoe BAR ал HA gu 


Function Builder: Change ZMDX SINOCO1 00001 


ШЕ ДГ | ДЕА JEN | 


Function module ?ИПХ SINOCO1 00001 


Function Module Documentation 


Inactive (revised) 


短文 本 
CELL БАТА LIKE BAPI6111CD 口 数据 集 单元 中 的 数据 
CELL PROPS LIKE BAPI6111PRN 属性 
CELL PROP NAMES LIKE BAPI6110PRPNANM i ЕНЕ 


7-21 RFC 函数 的 表 参 数 


在 函数 代码 中 , 将 МОХ DEBEO It command. text 内 表 ， 然 后 通过 调用 系统 标准 函数 
BAPL MDDATASET CREATE OBJECT 进行 数据 访问 ， 代 码 如 下 。 


FUNCTION zmdx_sinoc01_q0001. 


ж" ж "Local interface; 


ж"  [MPORTING 


ж" VALUE(I CALYEAR) ТҮРЕ /BIO/OICALYEAR 
ж"  EXPORTING 
x" VALUE(E_RETURN) TYPE BAPIRET2 
ж" TABLES 
x" CELL_DATA STRUCTURE BAPI6111CD 
x" CELL PROPS STRUCTURE BAPI6111PRN OPTIONAL 
ж CELL PROP NAMES STRUCTURE . BAPIG1IOPRPNAM OPTIONAL 
ж" 
DATA ;1 return TYPE bapiret2 , 


1. datasetid ТҮРЕ bapi6111gen — obj. handle, 
lt, command, text TYPE bapi6111mdx OCCURS 0, 
ІБ command, text TYPE bapi6111mdx. 


IF i. calyear IS INITIAL. "月 份 不 能 为 空 
e retum - type = E . 
e return — message = 至 少 需要 输入 一 个 年 度 . 
EXIT. 

ENDIF. 


ls command. text = SELECT . 
APPEND ls. command. text TO lt. command text. 
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ls command, text = | | Measures |. | DDBLGSC7SO1 LBOY YRBFEWDIYM |',. 
APPEND ls. command, text TO lt. command, text. 

ls. command, text = | Measures |. | DDBOBS8FSPYWG6JR92IJB2193 Y6 |! . 
APPEND Is. command, text TO lt. command, text. 

ls. command, text = ON COLUMNS; . 

APPEND Is. command, text TO lt. command, text. 

ls command, tex: = NON EMPTY . 

APPEND Is. command, text TO lt. command, text. 

ls command, text  [ GOGSDM |. MEMBERS . 

APPEND Is. command, text TO lt. command, text. 

ls. command, tex: = ON ROWS . 

APPEND Is. command, text TO lt. command, text. 

ls. command text = FROM SINOCOI/SINOCOI. 00001. 

APPEND ls. command, text TO lt. command, text. 

CONCATENATE SAP VARIABLES |! V000001] INCLUDING [OCALYEAR ]. [ і calyear | IN- 


TO ls command, text. 


APPEND ls. command, text TO lt. command, text. 


ж ІН МОХ 
CALL FUNCTION BAPI MDDATASET CREATE OBJECT 
IMPORTING 
return =] return 
datasetid —] datasetid 
TABLES 


command, text = lt, command text. 


IF 1 return - type = E OR 1 тешп-іуре А. 
e return — ] return. 
EXIT. 

ENDIF. 


DATA:lt cell data TYPE bapi6lllcd OCCURS 0, 
ls. data ТҮРЕ bapi6111cd, 
lt. columns TYPE bapi6115col OCCURS 0, 
ls. columns TYPE bapi6115col, 
] start cell TYPE bapi6111cd – cell, ordinal, 
] end cell TYPE bapi6111cd — cell. ordinal. 

ж 将 返回 的 表 转 换 到 CELL. DATA 
CALL FUNCTION BAPI MDDATASET GET CELL DATA 


EXPORTING 
datasetid —] datasetid 
start, cell —] start. cell 
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end cell =] end cell 


IMPORTING 
return - ] return 
TABLES 
cell. data = cell, data 
cell props = cell props 


cell prop. names = cell prop. names. 


e return — ] return. 


ENDFUNCTION. 


7.4.3 单元 小 结 


将 报表 结果 通过 МОХ 语句 封装 为 可 被 调用 的 对 象 后 ， 避 免 了 许多 之 前 不 能 实现 的 数 
据 交 换 (如 多 个 信息 块 的 数据 联合 访问 ) 这 样 就 给 系统 架构 或 项 目 开发 带 来 了 更 多 的 
便利 。 

但 需要 注意 的 是 ， 这 种 方式 只 适合 需要 报表 结果 的 情况 下 ， 如 果 需 要 传输 大 量 的 明细 数 
据 ， 如 单据 级 别 的 详细 数据 ， 则 建议 还 在 在 DSO 层面 使 用 Open Hub 或 直接 基于 DSO 编写 
功能 模块 的 方式 来 实现 。 


7.5 在 APD 中 使 用 ABAP 例 程 实施 


7.5.1 应 用 场景 描述 


很 多 时 候 ， 我 们 只 做 的 BW 查询 报表 可 能 在 运行 速度 上 有 所 欠缺 ,一 种 可 行 的 解决 方法 
就 是 使 用 BWA 来 解决 性 能 的 问题 ， 或 使 用 BW оп HANA, 通过 内 存 计算 提高 运行 速度 ， 但 
是 对 于 很 多 中 小 企业 来 说 这 样 的 方案 需要 投入 大 量 的 软 硬 件 费用 而 导致 不 可 实施 ; 另外 一 种 
方法 是 使 用 BW 自 带 的 APD 工具 ， 将 查询 运行 出 的 结果 存储 到 系统 一 个 DSO 中 ， 然 后 从 
DSO 中 将 结果 数据 上 载 到 信息 块 ， 基 于 存储 结果 数据 的 信息 块 出 具 报 表 ， 达 到 以 空间 换 时 
间 的 目的 ， 从 而 大 大 提升 报表 的 查询 性 能 。 

在 男 外 一 些 场景 下 ， 我 们 可 能 有 男 外 的 需求 ， 如 每 个 月 都 会 制作 资产 负债 表 和 损益 表 等 
重要 财务 报表 ， 由 于 ЕВР 系统 存在 后 续 调 账 的 可 能 ， 因 此 有 些 公 司 希 望 将 某 个 日 期 之 后 出 
具 的 报表 固定 起 来 ， 不 要 再 出 现任 何 变 更 ， 因 此 便 有 必要 将 这 些 财务 数据 进行 存储 ， 此 时 需 
要 使 用 APD 来 存储 查询 结果 数据 。 

定义 对 应 存储 DSO 时 ， 需 要 做 成 “基于 账户 的 模型 ”， 也 就 是 将 报表 项 作为 类 似 科 
目 一 样 的 对 象 ， 而 不 是 新 建 过 多 的 指标 来 与 报表 项 一 一 对 应 。 由 于 这 些 编号 信息 是 在 
系统 外 定义 ， 和 查询 之 间 的 匹配 需要 进行 人 为 的 指定 ， 因 此 需要 进行 ABAP 例 程 的 增强 
实施 。 
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7.5.2 实施 步 又 详解 


假设 已 经 在 BW 中 新 建 了 以 下 “利润 表 ” 查 询 ， 定 义 了 “营业 收入 “营业 利润 "“ 利 


润 总 额 ” 和 “净利 润 ” 等 报表 项 ， 如 网 7-22 所 示 。 


JL 2 х2 


一 、 营 业 收 入 
主音 业务 收入 
其 他 业务 收入 
减 :营业 成 本 
主音 业务 成 本 
其 他 业务 成 本 
营业 税金 及 附加 
销售 费用 
管理 费用 
财务 费用 
EPI 


公允 价位 变动 收益 


投资 收益 


其 中 : 对 旺 音 企业 和 合 昔 企业 的 投资 收益 


二 、 营 业 利 润 
fn: 营业 外 收入 


其 中 : 非 流动 资产 处 置 收益 


ж: 营业 外 支出 


其 中 : 非 流动 资产 处 置 损 类 


=. жне 
Ж: 所得税 


Ез. 当期 所 得 税 费 用 
送 延 所 得 税 费 用 


B. dx 


图 7-22 利润 表 结 构 


本 月 发 生 
-6,402,333,844.17 
6,304,980,386.27 
97,353,457.90 
5,487,221,984.21 
5,391,337,313.32 
95,884,670.89 
632,706,839.55 
11,093,245.51 
136,827 920.61 
16,411,229.23 
-324,401.32 


171,712.06 


-118,225,314.32 
-857,548.13 


5,367,011.87 
2,966,869.45 
-113,715,850.58 
28,011,612.31 
26,890,525.30 
1,121,087.01 
85,704,238.27 


与 之 对 应 的 ， 设 定 采 用 “基于 账户 的 模型 ”来 处 理 这 些 指标 ， 假 设 定义 对 应 的 指标 列 
表 见 表 7-1。 
27-1 利润 表 指标 定义 
指标 编码 指标 描述 

LRB_YYSR 一 、 和 营业 收入 

LRB_ZYYWSR 主 营 业务 收入 

LRB_QTYWSR 其 他 业务 收入 

LRB_YYCB 减 : 营业 成 本 

LRB_ZYYWCB 主 营 业务 成 本 
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(Ж) 


指标 编码 指标 描述 
LRB_QTYWCB 其 他 业务 成 本 
LRB YYSJJF] 营业 税金 及 附加 
LRB_XSFY 销售 费用 
LRB_GLFY 管理 费用 
LRB_CWFY 财务 费用 
LRB_ZCJZSS 资产 减 值 损失 
LRB_GYJZBD 公允 价值 变动 收益 
LRB_TZSY 投资 收益 
LRB_GLQYSY 其 中 : 对 联营 企业 和 合营 企业 的 投资 收益 
LRB_YYLR 二 、 营 业 利润 
LRB_YYWSR 加 : 营业 外 收入 
LRB_FLDZCCZSY 其 中 : 非 流动 资产 处 置 收益 
LRB_YYWZC 减 : 营业 外 支出 
LRB_FLDZCCZSS 其 中 : 非 流动 资产 处 置 损失 
LRB LRZE 三 、 利 润 总 额 
LRB_SDS 减 : 所 得 税 
LRB_DQSDSFY 其 中 : 当期 所 得 税 费用 
LRB_DYSDSFY 递 延 所 得 税 费用 
LRB_JLR 四 、 净 利润 


第 1 步 : 在 数据 仓库 工作 台中 新 建 DSO， 并 命名 为 DEMO_APD，DOS 对 象 定义 如 
图 7-23 所 示 。 


5 G APD DEMO DSO 
7 еве Oo БЕХ 
国 版 本 ”© 正在 处 理 
B 保存 БЕЗІ 
B 修订 版 本 三 | 活动 版 本 
D Еш @ 活动 , 可 执行 
” є = 
E 数据 存储 对 象 类 型 标准 
E) 激活 之 后 生成 主 数据 标识 
国 唯一 数据 记录 
D 自动 将 质量 状态 设置 为 好 
国 自动 激活 数据 
国 自动 更 新 数据 
vo 关键 字 字 段 
® 日 历年 /月 OCALMONTH NUMC 06 
Æ йт DEMOZB CHAR 20 
v Es 数据 字段 
Ая 月 度 指 标 值 DEMOYDZBZ DEC 09 数字 (... 1 CO SUM SUM 
> CSS 
> С + 


00000 


7-23 DSO 对 象 定义 
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注意 , 创建 DSO 时 ， 必 须 将 DSO 的 类 型 设置 为 “直接 更 新 ”， 单 击 “数据 存储 对 象 类 
型 ”右边 的 修改 按钮 .9]， 系 统 弹 出 如 图 7-24 所 示 的 对 话 框 。 


[e 数据 存储 对 象 : 选择 类 型 Pg 


数据 存 侍 对 银 : |. |DEMO APD 
描述 |APD DEMO 050 


加 标准 
O 直接 更 新 
〇 写 入 优化 的 


Р 7-24 DSO 类 型 切换 


选中 “直接 更 新 ” 单 选 按钮 后 ， 按 (Enter》 键 返回 DSO 的 定义 界面 ， 单 击 激活 按钮 [加 
激活 DS0。 此 时 系统 对 于 DSO 的 定义 界面 如 图 7-25 所 示 。 


Е 版 本 正在 处 理 
B 保存 © 已 保存 
B 修订 版 本 三 | 活动 版 本 
B не 活动 ,可 执行 
了 图 设置 m 
国 数据 存储 对 象 类 型 直接 更 新 
= 9 XüccH _ "EM ЕРЕН 
© 日 历年 /月 0CALMONTH NUMC 06 
Айта DEMOZB CHAR 20 
ui: nd 
4 月 度 指标 值 DEMOYDZBZ DEC 09 dr (... [V] Г] SUM SUM 
p 口 导 航 属性 
ЖЕ 


图 7-25 直接 更 新 DSO 对 象 定 义 


从 图 7-25 中 可 以 看 到 ， 此 时 DSO 无 须 设置 “激活 之 后 生成 主 数据 标识 ”和 “自动 将 
质量 状态 设置 为 “好 ”等 属性 。 至 此 ， 对 于 050 的 定义 设置 完毕 。 

第 2 步 : 定义 APD。 使 用 事务 码 RSANWB 进入 APD 的 定义 界面 ， 由 于 我 们 定义 的 是 
“一 般 ” 类 型 的 APD， 因 此 在 “一 般 的 ”上 面 单 击 鼠 标 右 键 ， 选 择 “ 创 建 ” 选 项 ， 进 行 
APD 的 创建 ， 如 图 7-26 所 示 。 

然后 ， 系 统 进入 APD 的 详细 设计 界面 ， 先 在 “描述 ”中 输入 “通过 АР) 存储 损益 表 指 
标 ”， 如 图 7-27 所 示 。 
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ЕЕ) ШШЕ ЛЕ ШЕ EE 1 И Bets 


通过 APD 存 依 损 益 志 指 标 
CRM_ATTRIB 新 a 
SATISFACTIC 

RT. ANALYTI 


图 7-27 输入 描述 


第 3 步 : 将 图 标 转 从 中 间 的 列表 中 拖 放 到 右边 的 白色 区 域内 ， 系 统 会 弹出 对 话 框 提示 
选择 需要 的 查询 ， 如 图 7-28 所 示 。 


R2YSZZYE 

燕山 -总 账 /会 计 入 证 /预算 

TTR2 RZYSZZYE Q SYBOOl 
DEMO- 损 益 表 


图 


图 7-28 查询 选择 
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在 此 处 ， 如 果 我 们 的 查询 是 需要 输入 变量 的 ， 则 需要 先 制作 变 式 ， 然 后 在 此 处 使 用 ， 建 
议 创 建 不 需要 输入 的 变量 ， 如 自动 输入 上 月 ， 并 且 不 需要 输入 ， 这 样 每 个 月 就 不 再 需要 变 
式 ， 系 统 就 能 自动 运行 上 月 的 查询 了 。 

第 4 步 : 选择 好 来 源 后 ， 选 择 目标 。 由 于 我 们 希望 将 查询 的 指标 结果 保存 到 “直接 更 
新 ”的 DSO 中 ， 因 此 从 中 间 的 列表 中 ， 将 图 标 国 拖 放 到 右边 的 空白 区 域 中 ， 此 时 系统 自动 
弹出 对 话 框 提示 用 户 输 入 需要 更 新 的 DSO， 这 里 选择 刚才 创建 的 DEMO_APD。 注 意 ， 只 有 
类 型 为 “直接 更 新 ”的 DSO 才能 在 此 处 被 选中 。 在 “描述 ”中 输入 目标 的 描述 “存储 损益 
表 指 标的 DS0”， 如 图 7-29 所 示 。 
[Ген +: 数据 存储 对 象 


P 数据 目标 目标 范围 


描述 阁 铺 损益 去 指 标的 D50 | 


选择 一 个 数据 存储 对 象 ， 用 于 直接 写 入 

将 写 入 的 数据 . 

数据 存 请 对 象 

数据 存 情 对 象 DENO_APD 
APD DEMO DSO ( 直接 更 新 ) 


| ea | 


图 7-29 输入 目标 的 描述 


第 5 步 : 在 “目标 范围 ”标签 页 中 设置 目标 DBO， 如 图 7-30 所 示 。 如 果 选 中 默认 的 


@ 栈 盖 数据 存储 对 象 所 有 的 内 容 
овалан іе 


和 名称 字段 名 称 限制 Val. 回 
日 历年 /月 OCALMONTH 口 
财务 指标 DEMOZE m [ 


图 7-30 设置 目标 DSO 
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“Жтт EROS РГН РІ” HRaETERL, MEEK APD 运行 都 会 覆盖 之 前 DSO 内 存储 的 
数据 。 如 果 选 中 “覆盖 部 分 数据 存储 对 象 ” 单 选 按钮 ， 并 在 字段 清单 中 选择 需要 对 比 的 字 
段 ， 则 系统 将 按照 指定 的 特性 组 合 键 值 对 直接 更 新 DSO 的 内 容 进行 更 新 ， 这 里 保留 默认 选 
项 即 可 。 

此 时 设 定 的 APD 就 有 数据 的 来 源 和 数据 更 新 的 目标 了 ， 如 图 7-31 所 示 。 


Data Sources 


вешае 


Transformations 


BB 3» е HE 


там 2 
N ІН. ' £3 


查询 1 жинак 
050 


图 7-31 具有 数据 来 源 和 更 新 目标 


由 于 我 们 希望 将 报表 的 结果 转换 为 “基于 账户 的 模型 "， 因 此 必须 在 两 者 之 间 增 加 
АВАР 例 程 ， 将 中 间 列 表 的 例 程 图 标 宰 拖 放 到 右边 的 白色 区 域 中 ， 如 图 7-32 所 示 。 


Data Sources 


ЕІ @ [d EB @ 


Transformations 


Y BP $ dd 


8 E. om е 


查询 1 例 程 1 FAREA 
| 050 


Data Targets 
Во E ES 2 
& ds 2 Я 


7-32 增加 АВАР 例 程 


此 时 需要 将 数据 来 源 与 АВАР 例 程 进行 连接 ， 同 时 将 АВАР 例 程 和 数据 目标 进行 连接 ， 
只 需 将 “ 源 ” 的 小 三 角 图 标 拖 放 到 “目标 ”的 小 三 角 图 标 上 即 可 。 连 接 完 毕 后 的 模型 如 
图 7-33 所 示 。 

从 图 7-33 中 可 以 看 到 ， 所 有 的 转换 例 程 均 存在 于 例 程 和 数据 目标 之 间 。 此 时 双击 例 程 ， 进 
入 例 程 的 设置 界面 ， 输 入 例 程 的 描述 “将 损益 表 转 换 为 基于 账户 的 模型 "， 如 图 7-34 所 示 。 
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Data Sources 


вешае 


Transformations 
Y EB 3 c» HH 
айтат 


Н--т---е 


查询 1 例 程 1 Е Io 65 
DSO 


将 损益 表 转 换 为 基于 账户 的 模型 


图 7-34 输入 例 程 描述 


在 “ 源 字段 ”标签 页 中 ， 将 所 有 需要 存储 的 对 象 选择 到 “ 源 字段 ”列表 中 ， 如 图 7-35 
所 示 。 


E4770) NN — - — RH 
Wsls] .— — | sls| ( 
ET E 

[on HH = ағ рТ? ЕГІЗ 


п 


KYF 0016 | 
一 、 营 业 收 入 KYF_0001 
=. 利润 总 额 KYF_0020 | 5 
二 、 SAH KYF_0015 | 
ЕЗІН KYF. 0024 ш 
日 历年 /月 CALMONTH B 


7-35 例 程 源 字段 选择 界面 


了 22 


进入 “目标 字段 ”标签 页 中 可 以 看 到 ， 系 统 会 自动 根据 选择 的 源 字段 产生 目标 字段 ， 
如 图 7-36 所 示 。 


[cr Be DUE 


[2| [c [ee [E [n] | & [ ev | a [ 
目标 字段 
字段 名 称 描述 类 型 (信息 对 象 ) [描述 
KYF_0023 递 延 所 得 税 费 用 
KYF_0005 | 主 营业 务 成 本 
| | КҮЕ 0002 主 营业 务 收入 
KYF_0006 其 他 北 务 成 本 
| | КҮЕ 0003 其 他 业务 收入 
KYF_0019 | 其中: 非 流动 资产 处 置 损 关 
| | КҮР 0017 | 其中: 非 流动 资产 处 置 收 去 
KYF_0012 公允 价值 变动 收益 
| | KYF_0014 其 中 : 对 联营 企业 和 合营 企 
KYF_0022 其 中 : 当期 所 得 税 费用 
| | КҮЕ 0004 减 :营业 成 本 
KYF_0013 投资 收益 
| | КҮЕ 0009 管理 费用 
KYF_0007 | 营业 税金 及 附加 
| | КҮЕ 0010 财务 费用 
KYF_0011 资产 减 值 损失 
| | KYF. 0008 HERA 
KYF_0021 减 : 所 得 税 
| | ҠҮҒ 0018 8: 营业 外 支出 
KYF 0016 3n: 营业 外 收入 
| ЇКҮЕ 0001 — E S 
ЕЗІ | [6] 


图 7-36， 例 程 目标 字段 选择 界面 1 


这 里 将 所 有 自动 产生 的 目标 字段 删除 ， 并 且 新 增 4 个 字段 ， 即 CALMONTH, DEMOZB, 
DEMOYDZBZ 和 DEMONDZBZ， 以 与 目标 DSO DEMO_APD 完全 匹配 ， 如 图 7-37 所 示 。 


ETT E 
目标 字段 
[2p [E [Ee [E ЕЛ ЕДТ 
目标 字段 
字段 名 称 [is | 类 型 (信息 对 象 ) [ағ | 
| |CALMONTH| 日 历年 /月 OCALMONTH 日 历年 /月 
DEMOZB 财务 指标 DEMOZB 财务 指标 
DEMOYDZBZ 月 度 指标 值 DEMOYDZBZ 月 度 指标 值 
DEMONDZBZ 年 度 指标 值 DEMONDZBZ 年 度 指标 值 


ЕЗІЛДІ 


7-37 例 程 目标 字段 选择 界面 2 
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设置 好 目标 字段 后 ， 即 可 进入 “ 例 程 ”标签 页 进行 АВАР 例 程 的 编写 。 系 统 自动 生成 
的 代码 如 下 。 


REPORT RSAN. WB. ROUTINE TEMP. REPORT . 


TYPES: BEGIN OF y. source fields, 
KYF 0023 TYPE FLOAT, 
KYF 0005 TYPE FLOAT, 
KYF 0002 TYPE FLOAT, 
KYF 0006 TYPE FLOAT, 
KYF 0003 TYPE FLOAT, 
KYF 0019 TYPE FLOAT, 
KYF 0017 TYPE FLOAT, 
KYF 0012 TYPE FLOAT, 
KYF 0014 TYPE FLOAT, 
KYF 0022 TYPE FLOAT, 
KYF 0004 TYPE FLOAT, 
KYF 0013 TYPE FLOAT, 
KYF 0009 TYPE FLOAT, 
KYF 0007 TYPE FLOAT, 
KYF 0010 TYPE FLOAT, 
KYF 0011 TYPE FLOAT, 
KYF 0008 TYPE FLOAT, 
KYF 0021 TYPE FLOAT, 
KYF 0018 TYPE FLOAT, 
KYF 0016 TYPE FLOAT, 
KYF 0001 TYPE FLOAT, 
KYF 0020 TYPE FLOAT, 
KYF 0015 TYPE FLOAT, 
KYF 0024 TYPE FLOAT, 
CALMONTH TYPE /BIO/OICALMONTH, 

END OF y. source fields . 
TYPES: уі source fields TYPE STANDARD TABLE OF y. source fields . 


TYPES: BEGIN OF y. target. fields, 
CALMONTH TYPE /BIO/OICALMONTH, 
DEMOZB TYPE /BIC/OIDEMOZB, 
DEMOYDZBZ TYPE /BIC/OIDEMOYDZBZ, 
DEMONDZBZ TYPE /BIC/OIDEMONDZBZ, 
END OF y target. fields . 
TYPES: уі target fields TYPE STANDARD TABLE OF y. target, fields . 
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Ж---------- Begin of type definitions 


ж 一 一 一 一 一 一 一 一 一 一 一 End of type definitions 
FORM compute, data, transformation 
USING it source TYPE yt. source, fields 
ir. context TYPE REF TO if rsan rt, routine context 
EXPORTING et target TYPE yt. target. fields . 


p Begin of transformation code 


DATA ls source TYPE y. source fields, 
ls target TYPE y target. fields. 


LOOP AT it. source INTO ls source. 
MOVE - CORRESPONDING 15 source TO ls target. 
APPEND 15 target TO et. target. 

ENDLOOP. 


D End of transformation code 


ENDFORM. 


从 程序 中 可 以 看 到 ， 系 统 将 查询 的 结果 存放 到 结构 y source fields 中 ， 并 且 用 相同 结构 
的 内 表 yt. source fields 存储 了 数据 ， 我 们 的 任务 就 是 向 目标 表 yt_target_fields 中 填充 需要 的 
数据 ， 即 填 入 24 行 数 据 ， 编 写 的 代码 如 下 。 


REPORT RSAN. WB. ROUTINE TEMP REPORT . 


TYPES: BEGIN OF y. source fields, 
KYF 0023 TYPE FLOAT, 
KYF 0005 TYPE FLOAT, 
KYF 0002 TYPE FLOAT, 
KYF 0006 TYPE FLOAT, 
KYF 0003 TYPE FLOAT, 
KYF 0019 TYPE FLOAT, 
KYF 0017 TYPE FLOAT, 
KYF 0012 TYPE FLOAT, 
KYF 0014 TYPE FLOAT, 
KYF 0022 TYPE FLOAT, 
KYF 0004 TYPE FLOAT, 
KYF 0013 TYPE FLOAT, 
KYF 0009 TYPE FLOAT, 
KYF 0007 TYPE FLOAT, 
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KYF 0010 TYPE FLOAT, 
KYF 0011 TYPE FLOAT, 
KYF 0008 TYPE FLOAT, 
KYF 0021 TYPE FLOAT, 
KYF 0018 TYPE FLOAT, 
KYF 0016 TYPE FLOAT, 
KYF 0001 TYPE FLOAT, 
KYF 0020 TYPE FLOAT, 
KYF 0015 TYPE FLOAT, 
KYF 0024 TYPE FLOAT, 
CALMONTH TYPE /BIO/OICALMONTH, 
END OF y. source fields . 
TYPES: yt. source fields TYPE STANDARD TABLE OF y. source fields . 


TYPES: BEGIN OF y. target. fields, 
CALMONTH TYPE /BIO/OICALMONTH, 
DEMOZB TYPE /BIC/OIDEMOZB, 
DEMOYDZBZ TYPE /BIC/OIDEMOYDZBZ, 
END OF у target. fields . 
TYPES: уі target fields TYPE STANDARD TABLE OF y. target, fields . 


Ж----------- Begin of type definitions 
* TYPES: 
ж 一 一 一 一 一 一 一 一 一 一 一 End of type definitions 


FORM compute_data_transformation 
USING it source ТҮРЕ yt. source, fields 
ir context TYPE REF TO if rsan гі routine context 
EXPORTING et target ТҮРЕ yt. target. fields . 


ж 一 一 一 一 一 一 一 一 一 Begin of transformation code 


DATA :ls source TYPE y. source fields, 
ls target TYPE y target. fields. 


LOOP AT it. source INTO ls source. 
* 一 营业 收入 
ls target — calmonth = Is, source - calmonth. 
ls target - demozb = LRB. YYSR . 
ls target - demoydzbz = ls source - kyf 0001. 
APPEND 15 target TO et. target. 
* 主 营 业务 收入 


ls target — calmonth = Is, source - calmonth. 
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ls target - demozb = LRB. ZYYWSR . 


ls target - demoydzbz = ls source - kyf. 0002. 


APPEND 15 target TO et. target. 
* 其 他 业务 收入 
ls target — calmonth = Is, source — calmonth. 


ls target - demozb = LRB. QTYWSR . 


ls target — demoydzbz = ls source - Ку? 0003. 


APPEND 15 target TO et. target. 
* 减 :营业 成 本 
ls target — calmonth = Is, source — calmonth. 


ls target - demozb = LRB. YYCB . 


ls target - demoydzbz = ls source - kyf. 0004. 


APPEND 15 target TO et. target. 
* 主 营业 务 成 本 
ls target — calmonth = Is, source — calmonth. 


ls target - demozb = АВ ZYYWCDB . 


ls target — demoydzbz - ls source - kyf 0005. 


APPEND 15 target TO et. target. 
其 他 业务 成 本 
ls target — calmonth = Is, source — calmonth. 


ls target — demozb = LRB. QTYWCB . 


* 


ls target — demoydzbz = ls source - Ку? 0006. 


APPEND 15 target TO et, target. 
营业 税金 及 附加 
ls target — calmonth = ls, source - calmonth. 


ls target - demozb = LRB. YYSJJFJ . 


* 


ls target — demoydzbz = ls source - Ку 0007. 


APPEND 15 target TO et. target. 
销售 费用 
ls target — calmonth = Is, source - calmonth. 


ls target - demozb = LRB. XSFY . 


* 


ls target — demoydzbz - ls source - kyf 0008. 


APPEND 15 target TO et, target. 
* 管理 费用 
ls target — calmonth = Is, source — calmonth. 


ls target - demozb = LRB. GLFY . 


ls target - demoydzbz = ls source - КуЁ 0009. 


APPEND 15 target TO et. target. 
* 财务 费用 
ls target — calmonth = Is, source - calmonth. 


ls target - demozb = LRB. CWFY . 


ls target - demoydzbz = ls source - kyf 0010. 
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APPEND 15 target TO et. target. 

* 资产 减 值 损失 
ls target - calmonth = Is, source — calmonth. 
ls target - demozb = LRB. ZCJZSS . 
ls target — demoydzbz = ls source - kyf 0011. 
APPEND 15 target TO et, target. 

* 公 人 允 价 值 变 动 收 益 
ls target — calmonth = Is, source - calmonth. 
ls target – demozb = АВ GYJZBD . 
ls target — demoydzbz - ls source - kyf 0012. 
APPEND ls target TO et. target. 

* 投资 收益 
ls target — calmonth = Is, source - calmonth. 
ls target - demozb = LRB. TZSY . 
ls target — demoydzbz = ls source - Ку? 0013. 
APPEND 15 target TO et. target. 

* 其 中 :对 联营 企业 和 合营 企业 的 投资 收益 
ls target - calmonth = Is, source — calmonth. 


ls target – demozb = LRB. GLQYSY . 


ls target - demoydzbz = ls source - КуЁ 0014. 
APPEND 15 target TO et, target. 

* 二 营业 利润 
ls target — calmonth = Is, source - calmonth. 
ls target - demozb = LRB. YYLR . 
ls target — demoydzbz - ls source - kyf 0015. 
APPEND 15 target TO et, target. 

+ 加 :营业 外 收入 
ls target — calmonth = Is, source — calmonth. 
ls target - demozb  LRB. YYWSR . 
ls target - demoydzbz = ls source - КуЁ 0016. 
APPEND ls target TO et. target. 

* 其 中 : 非 流动 资产 处 置 收益 
ls target — calmonth = Is, source - calmonth. 
ls target - demozb = LRB. FLDZCCZSY . 
ls target — demoydzbz - ls source - kyf 0017. 
APPEND ls target TO et. target. 

* 减 :营业 外 支出 
ls target — calmonth = Is, source — calmonth. 
ls target - demozb = LRB. YYWZC . 
ls target — demoydzbz = ls source - kyf 0018. 
APPEND 15 target TO et, target. 

* 其 中 : 非 流动 资产 处 置 损失 
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ls target — calmonth = Is, source - calmonth. 
ls target – demozb = LRB. FLDZCCZSS . 
ls target - demoydzbz = ls source - КуЁ 0019. 
APPEND 15 target TO et. target. 

* 三、 利润 总 额 
ls target — calmonth = Is, source - calmonth. 
ls target - demozb = LRB. LRZE . 
ls target — demoydzbz - ls source - kyf 0020. 
APPEND 15 target TO et. target. 

* 减 :所 得 税 
ls target — calmonth = Is, source — calmonth. 
ls target – demozb = LRB. SDS . 
ls target — demoydzbz - ls source - kyf 0021. 
APPEND 15 target TO et. target. 

* 其 中 :当期 所 得 税 费用 
ls target — calmonth = Is, source - calmonth. 
ls target - demozb = LRB. DQSDSFY . 
ls target - demoydzbz = ls source - КуЁ 0022. 
APPEND 15 target TO et. target. 

* 递 延 所 得 税 费用 
ls target — calmonth = Is, source — calmonth. 
ls target - demozb = LRB. DYSDSFY . 
ls target — demoydzbz = ls source - Ку? 0023. 
APPEND 15 target TO et. target. 

ж 四 .净利 润 
ls target — calmonth = Is, source - calmonth. 
ls target – demozb = LRB Л.Е. 
ls target — demoydzbz = ls source - КуЁ 0024. 
APPEND 15 target TO et. target. 

ENDLOOP. 


ж 一 一 一 一 一 一 一 一 一 一 End of transformation code 


ENDFORM. 


ДЕРІ 7-33 ФЕ Ee, ET; АВАР 例 程 目标 字段 和 DSO 字段 的 连接 ， 系 统 弹 出 如 
图 7-38 所 示 的 界面 。 


У нот | 
滞 用 在 边栏 中 可 能 的 条 目 功能 ， 
将 源 结构 字段 分 本 到 目标 结构 字段 中 . 


aaja] 
目标 结构 方法 来 源 结构 
日 历年 /月 

ШТ 
ЕЕ 


(47-38 例 程 字段 分 配 界面 1 
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单 击 每 个 字段 后 面 的 “方法 ”按钮 ， 系 统 弹 出 更 新 方法 选择 按钮 供用 户 选 择 ， 如 
7-39 所 示 。 


[EE 更 羽 字段 分 配 : 明细 


目标 字段 日 历年 /月 
字段 名 称 0CALMONTH 


ler 


7-39 字段 分 配 详 细 界 面 


此 时 ， 只 和 需 选 中 “ 源 特性 ” 单 选 按 钮 ， 并 单 击 帮助 按钮 回 找 到 对 应 的 字段 即 可 。 设置 
完毕 后 的 匹配 规则 如 图 7-40 所 示 。 


E 


ЗЕЕ АНУ 
将 源 结构 字段 分 本 到 目标 结构 字段 中 . 


—— a 


7-40 例 程 字段 分 配 界面 2 


当 保 存 和 激活 分 析 程 序 时 ， 系 统 将 弹出 对 话 框 提示 输入 此 АР) 的 技术 名 称 ， 这 里 输入 
“DEMOAPD”， 如 图 7-41 所 示 。 


[输入 一 个 技术 名 称 
分 析 程序 [DENOAPDI Е A 


图 7-41 输入 APD 的 技术 名 称 


激活 完毕 后 的 APD 就 能 运行 了 了， 运行 АР) 系统 的 日 志 如 图 7-42 ж, 运行 完毕 后 查 


看 050 的 内 容 如 图 7-43 所 示 。 
此 时 ， 系 统 已 经 将 损益 表 的 内 容 按照 类 似 科 目的 方式 保存 到 系统 中 了 ， 这 样 的 APD 可 


以 安排 在 处 理 链 中 每 月 运行 一 次 ， 或 在 财务 月 结 完毕 后 手动 运行 一 次 ， 这 样 就 达到 了 我 们 最 
初 想 要 保存 查询 结果 的 目的 。 


了 30 


日 志 (L) 编辑 (E) 转 到 (6) 系统 (Y) 帮助 (H) 


[v] a scale CAR ата Е ог 


je] [& wv [a8 | « [se 5] ч] 5а ЕРІ ШЕШЕЛЕРІ 
ЕЕ o | 

执行 分 析 程 序 DEMOAPD, 版 本 А 
执行 分 析 过 程 


程序 开始 为 了 分 析 程序 DEMOAPD 
EBENE EARN i | 

已 经 是 除了 DataStore 对 象 DEMO_APD 中 的 | 日 数据 。 
| OLAP S: 无 效 关键 秆 

OLAP 88: 无 效 关键 值 

OLAP Ва: Ж ЕН 


[E 


ЖЕН 


mim mim m >к > >ш mm mim 


(T) 


24 记录 与 入 到 数据 存 侍 对 象 DEMO_APD 
成 功 的 把 数据 写 久 分 析 流 程 的 数据 目标 中 


成 功 的 完成 分 析 程序 DEMOAPD 的 处 理 


图 7-42 APD 运行 日 志 


编辑 (E) 转 到 (6) 设置 (5) 实用 程序 (U) 环境 (N) 系统 (Y) 帮助 (H) 


= 


чосае BAR ъа o Gu 


数据 浏览 器 : 表格 /BIC/ADEMO_APD00 选择 条 目 24 


ЕЕ e er] [8 [ES ON] 


dA sU rius 


Еле: 


RP /BIC/DEMOZB /BIC/DEMOYDZBZ ECORDMODE 


LRB CWFY 
LRB_DQSDSFY 
LRB_DYSDSFY 
LRB_FLDZCCZSS 
LRB_FLDZCCZSY 
LRB_GLFY 
LRB GLQYSY 
LRB GYJ]ZED 
LRB JLR 

LRB LRZE 
LRB ОТҮҮСВ 
LRB QTYWSR 
ІКЕ SDS 

ІКЕ Т25Ү 
LRB XSFY 
LRB YYCB 
LRB YYLR 
LRB YYSJJFJ 
LRB YYSR 
LRB YYWSR 
LRB YYWZC 
LRB 201255 
LRB ZYYWCB 
LRB ZYYWSR 


固定 栏目 : 2 列表 宽度 0250 


16, 411, 229. 
26, 890, 525 

ДЫП ОВ: 

2, 966, 869. 

0 

136, 827, 920 

0 

0 

85, 704, 238 
113, 715, 850 
95, 884, 670 
97, 353, 457. 
28, 011,612. 
ШЛ: 

11, 093, 245 

5, 487, 221, 984 
118, 225, 314 
632, 706, 839 
6, 402, 333, 844 
857, 548 

5, 367, 011. 
324,401. 

5, 391, 337, 313. 
6, 304, 980, 386 


图 7-43 ”目标 内 容 查 看 
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7.5.3 单元 小 结 


一 般 来 说 ， 在 商务 智能 或 数据 仓库 的 项 目 实施 过 程 中 ， 我 们 都 会 定义 与 企业 相关 的 大 量 
指标 ， 或 梳理 完毕 的 指标 体系 ， 而 这 些 指标 又 是 在 经 营 管理 过 程 中 经 常会 被 调用 的 数据 ， 
此 每 月 月 结 完毕 后 ， 需 要 将 这 些 指标 固化 下 来 并 存储 到 指定 的 位 置 ， 这 样 可 以 为 后 续 的 数据 
展现 提供 极 大 的 便利 。 
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第 8 章 计划 中 的 功能 增强 


ТЕ BW 3.5 (与 之 对 应 的 是 Netweaver 2004 平台 ) 之 前 ， 如 果 需 要 在 BW 上 进行 预算 和 
计划 〈 以 下 简称 计划 ) ， 则 需要 安装 SEM 组 件 ， 使 用 其 中 的 SEM -BPS 产品 基于 BW 信息 块 
进行 预算 。 从 BW 3. 5 开始 ，BPS 这 一 部 分 的 功能 已 经 自动 集成 到 BW 系统 中 ， 称 为 BW - 
BPS, M BW 7.0 开始， 出 于 将 “报表 查看 ”和 “数据 计划 ”集成 于 同一 界面 的 考虑 ，SAP 
推出 了 BW -IP 产品 。 从 目前 最 新 的 BW 7.4 版 本 来 看 ， 新 的 ВРС 又 将 推出 新 的 内 置 于 
BW -IP 的 功能 ， 因 此 针对 预算 的 功能 增强 进行 详细 说 明 还 是 很 有 必要 的 。 

fr BW 中 进行 预算 的 好 处 是 : 一 方面 ，BW 系统 集成 了 来 自 ERP 系统 的 相关 主 数据 ， 如 
会 计 科目 、 销 售 渠道 和 产品 组 等 ， 另 一 方面 ，BW 系统 能 够 将 预算 和 计划 后 的 数据 无 颖 地 集 
成 回 ERP 系统 中 。 

总 体 说 来 ， 在 BW 的 计划 中 ,一 共有 3 种 不 同类 型 的 АВАР fife, АЖАТ. 

1) 根据 АВАР 例 程 编写 的 变量 。 

2) 根据 用 户 输入 特性 自动 派生 出 的 其 他 特性 ， 如 根据 控制 范围 派生 出 货币 等 。 

3) 其 他 特殊 编写 的 ABAP 例 程 。 

由 于 目前 BW -BPS ЯП BW -JIP 都 会 在 项 目 中 或 多 或 少 地 接触 到 ， 因 此 本 章 将 针对 不 同 
类 型 的 例 程 ， 分 别 对 BW -BPS 和 BW -IP 进行 介绍 。 


8.1 应 用 场景 描述 


假设 现在 正在 实施 一 个 预算 项 目 ， 既 使 用 了 BW -BPS 的 功能 ， 又 使 用 了 BW - IP 的 功 
能 。 现 在 用 户 有 如 下 的 几 个 需求 : 

1) 在 执行 相关 功能 时 ， 部 分 变量 能 够 使 用 系统 默认 的 相关 设置 ， 假 设计 划 只 针对 物料 
WR *IM-01-1M-ZZ', 
2) 在 执行 相关 功能 时 , “日 历年 ”和 “日 历 月 ”等 变量 能 够 通过 输入 的 “日 历年 月 ” 
变量 自动 推算 得 到 ， 并 且 在 相互 之 间 不 匹配 时 给 出 预警 。 

3) 执行 销售 计划 时 ， 用 户 只 需 输 入 “销售 数量 ”和 “销售 价格 ”， 系 统 将 自动 计算 
“销售 额 ”。 


8.2 变量 的 ABAP 应 用 实施 


8.2.1 BW - BPS 中 的 变量 实施 


BW - BPS 中 的 变量 和 Bex 中 的 变量 有 很 大 区 别 ， 在 Bex 变量 中 ， 我 们 只 需 在 查询 运行 

时 填充 上 变量 的 值 即 可 ， 但 是 在 BW - BPS 中 ， 变 量 的 值 需 要 使 用 Exit 进行 填充 。 另 外 一 个 
不 同 是 ， 在 整个 过 程 中 ， 我们 可 以 通过 单 击 “ 组 变量 ”中 的 按钮 (说明 : “Set Variables" 
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实际 上 应 该 翻译 为 “设置 变量 " ) 的 方式 来 查看 当前 变量 的 值 ， 如 图 8-1 所 示 。 


ЕГІ 编辑 (E) HAO _ 实 用 程序 (U) IAT) 系统 (Y) 都 助 (H) 

|6 s 4 Ш\Ф@@ SAHAR s їз angl) ot 
更 改 计 划 范 围 SINORCO1 

ESSET | | 计划 参数 文件 


全 局 计划 顺序 | 1 | 组 变量 


ET 技术 名 称 ЦЕ ЕГ] 
v Q SINO 第 一 个 计划 范围 SINORCO1 I T 
了 层次 结构 限制 公司 代码 RCO1LV03 [sz [m] [se] [& EEK 
特别 包 0-ADHOC 变量 
b 年度: 价格 RCO1LVO1 
р рне RC01LV02 计划 区 域 十 计划 区 域名 称 Jajee zu Tem Jam Jis Is ] 
SINORC01 | SINO 第 一 个 计划 范围 | to | VWLSX | 根据 属性 确定 物料 “60WL — | 物料 
SINORC01 | SINO 第 一 个 计划 范围 Æ HGSDM | 公司 代码 GOGSDM ZARA 
SINORCO1 | SINO 第 一 个 计划 范围 АР уул 物料 变量 GOWL  $»H TD EE 


SINORCO1 SINO 第 一 个 计划 范围 [j |VKVAL інің 10 


计划 功能 技术 名 称 


“ 层次 结构 限制 公司 代码 RCO1LV03 
` 重 估 上 浮 10% REVAL 
上 浮 10% REVALIO — 
У 手工 计划 0-МР 
手工 计划 LV03MP01 


8-1 “组 变量 ” 设 定 变量 的 运行 值 


但 是 ， 在 变量 中 使 用 ABAP 例 程 也 会 导致 一 个 问题 ， 如 一 个 Exit 读 取 另 外 一 个 变量 来 给 
目标 变 : 量 赋值 ， 我 们 并 不 知道 男 外 的 这 个 变量 是 否 被 使 用 到 。 与 Bex 中 的 变 ROSE, 在 
Exit 中 我 们 也 将 变量 分 为 “不 依据 其 他 变量 的 变量 ”和 “依据 其 他 变量 的 变量 ”两 种 情况 ， 
分 别 进行 处 理 。 

ТЕ BW - BPS 中， 变量 有 4 种 不 同 的 类 型 ， 即 特性 变量 、 属 性 派生 变量 、 层 次 结构 变量 
和 指标 变量 ， 它 们 分 别 对 应 的 设置 和 АВАР 例 程 如 下 。 

1) 处 理 类 型 为 Exit 的 特性 变量 设置 ， 具体 如 图 8-2 所 示 。 


计划 范围 - 基本 [SINORCO1| |SINO 第 一 个 计划 范围 


D| z er [m] | a [ee [a | e [ SE] 特性 物料 HE 
ят 
жин [жш Tem 11 
© ЖЕН ЕН | VWLSX 
da 公司 代码 HGSDM 文本 重 置 0 ка “| 中 间 文本 I E] 
А wu ШИП guam 用 Pt 5 
EE уу. язе азва | | 
功能 模块 名 称 [ZUPF VARIAELE USER EXIT GOWL | ЕЗ 


图 8-2 处 理 类 型 为 Exit 的 特 型 变量 设置 


处理 类 型 为 Exit 的 特性 变量 功能 模块 ， 其 代码 如 下 


FUNCTION zupf_variable_user_exit_g0wl. 


ж 


ж" ж "Local interface; 
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ж"  [MPORTING 


ж VALUE(I AREA) ТҮРЕ UPC Y AREA 

ж VALUE(I VARIABLE) ТҮРЕ ОРС Y VARIABLE 

ж" VALUE(I CHANM) ТҮРЕ ОРС Y CHANM OPTIONAL 

ж VALUE(ITO CHANM) ТҮРЕ UPC YTO CHA 

ж"  EXPORTING 

ж" REFERENCE(ETO CHARSEL) TYPE UPC ҮТО CHARSEL 
ж" EXCEPTIONS 

ж" FAILED 


DATA |І eto charsel wa ТҮРЕ пре. ys charsel. 
* 清空 输出 表 


CLEAR eto_charsel. 


] eto charsel wa — chanm = i_chanm. 


] eto charsel wa - seqno = 0001 . 


] eto charsel wa-sign = 1. 
] eto charsel wa-opt = ВТ. 
] eto charsel wa-low = IM -01. 


] eto charsel ма -high = IM -ZZ. 
INSERT І eto. charsel. wa INTO TABLE eto. charsel. 
* 检查 信息 对 象 
IF i chanm IS INITIAL OR i chanm NE GOWL. 
MESSAGE e538(upc) RAISING failed. 
ENDIF. 
ENDFUNCTION. 


2) 处 理 类 型 为 Exit 的 属性 派生 变量 设置 ， 具 体 如 图 8-3 所 示 。 


计划 范围 - 基本 SINORCO1 | |SINO 第 一 个 计划 范围 
属性 яңы ЖГП 主 数据 ， 特征 关系 
п [| | a [e [a | ve S [| E 基本 特征 | 物料 т 
zm 
类 型 [ 变 里 措 述 Tee 1 属性 物料 组 
O | 根据 属性 确定 物料 VWLSX 
da | 公司 代码 HGSDM 
A тете VWL 
EJ інін VKVAL 
SERERE | 中 间 文本 a 
重要 类 型 —— — MAHD EN 
功能 模块 名 称 [ZUPF VARIAELE USER EXIT GOWLSX 


图 8-3 处 理 类 型 为 Exit 的 属性 派生 变量 设置 
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处 理 类 型 为 Exit 的 属性 派生 变量 功能 模块 ， 其 代码 如 下 : 


FUNCTION zupf_variable_user_exit_g0wlsx. 


* " ж "Local interface: 


ж"  [MPORTING 


ж VALUE(I AREA) ТҮРЕ UPC Y AREA 

ж VALUE(I VARIABLE) ТҮРЕ ОРС Y VARIABLE 

ж VALUE(I CHANM) ТҮРЕ UPC Y CHANM OPTIONAL 

ж VALUE(ITO CHANM) ТҮРЕ UPC YTO CHA 

ж VALUE(ITO ATTR) ТҮРЕ UPC YTO ATTR 

ж" EXPORTING 

ж REFERENCE(ETO CHARSEL) TYPE ОРС ҮТО CHARSEL 
ж" EXCEPTIONS 

ж FAILED 


DATA:1 eto charsel wa TYPE пре. ys. charsel, 
1 айг LIKE LINE OF ito аі. 


DATA :lto_chasel ТҮРЕ upc. yto. chasel , 
Шо. chasel. wa TYPE upc. ув. chasel,, 
По. attr chasel TYPE upc, yt chamg, 


Шо attr chasel, wa TYPE upc. ys charng. 


DATA :leto. chavl TYPE upc. yto. chavl. 


ж get attribute OMATL GROUP from import attribute table ito ай 
READ TABLE ію attr WITH TABLE KEY atrnm = GOWLZ 
INTO 1 attr. 
IF sy — subrc NE 0. 
MESSAGE e538(upc) RAISING failed. 
ENDIF. 
* clear export table 


CLEAR eto, charsel. 


Шо chasel, wa — chanm = ] attr. 
* fill selection table with two entries 
По аш chasel wa-sign ZI. 
Шо аш chasel wa - option = ЕО. 
По ай chasel wa-low = IM. 
Шо. attr chasel ма- high = 
INSERT Ію айт chasel. wa INTO TABLE Шо анг chasel. 
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Шо. chasel. ма-і charng = Шо attr. chasel. 


INSERT lto_chasel wa INTO TABLE Ію chasel. 


CALL FUNCTION UPC CHA VALUES GET 


EXPORTING 
i area ші area 
i chanm ші chanm 
ito. chasel -Шо chasel 


i no compound = X 


IMPORTING 

eto. chavl = leto. chavl 
EXCEPTIONS 

OTHERS =1. 


IF sy — subrc МЕ 0. 
RAISE failed. 
ENDIF. 


DATA :ltmp s chavl TYPE upc. ys chavl, 
leto. charsel. wa TYPE upc. ув charsel. 


* fill the result entries into the export table 


LOOP AT leto, chavl INTO ltmp. s. chavl. 


leto. charsel wa – chanm 2i chanm. 
leto. сһагве! wa — seqno = sy — tabix. 
leto. charsel. wa — sign = 
leto_charsel_wa — opt = EQ. 
leto_charsel_wa — low -Ішар s. chavl – chavlint. 
INSERT leto, charsel. wa INTO TABLE ею charsel. 
ENDLOOP. 
ENDFUNCTION. 


3) 处 理 类 型 为 Exit 的 层次 结构 变量 设置 具体 如 图 8-4 所 示 。 


计划 范围 -基本 SINORCO1| [SINO 第 一 个 计划 范围 
Ен, СІР S ta o HEAR 

Digg оа ТЕЛЕ] КЗ 特性 сози [у 

хе 层次 结构 _ _[105_ВР5_НТЕК 

类 型 | 变 里 描述 jse 1 ЖЖ ВРЕ 

5% 根据 属性 确定 物料 VWLSX 层次 结构 版 本 有 效 至 9999.12.31 

аъ ABS HGSDM === 

Ё онха ү EXAM mun a] 

Ші жан уут 回 由 用 户 需要 值 的 限制 

功能 模块 名 称 ZUPF VARIAELE USER EXIT HGSDM | |44 


图 8-4 处 理 类 型 为 Exit 的 层次 结构 变量 设置 
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这 里 需要 建立 一 个 包含 文本 节点 АБА 的 层次 结构 ， 层 次 结构 设置 如 图 8-5 所 示 。 


区 
| 三 次 结构 (了 】 编辑 (E) 转 到 (6) 系统 (Y) 帮助 (H) 


=. | зао еае BAR ъа ао 


结构 'BPS 用 层次 结构 " 显示 : “活动 版 本 ' 


ajoja ]| sem | шхашшн ЕНЕЛІБИР ШІСІ 
] 特 性 节点 | 门 公司 代码 a [а 2а [е a 


D COENA OHIER NODE EURO - 

v 全 亚洲 公司 OHIER_NODE ASIA m 

AE 中国 公司 GOGSDM 1001 口 

Æ ERAS 60650М 1002 口 

Айғақ АН! 60650М 1003 D 
18-5 ”层次 结构 设置 


处 理 类 型 为 Exit 的 层次 结构 变量 功能 模块 ， 其 代码 如 下 : 


FUNCTION zupf_variable_user_exit_hgsdm. 


ж" ж "Local interface; 


ж"  [MPORTING 


ж" VALUE(I TYPE) ТҮРЕ UPC Y VAR TYPE 

ж VALUE(I AREA) ТҮРЕ UPC Y AREA 

ж VALUE(I VARIABLE) ТҮРЕ ОРС Y VARIABLE 

ж VALUE(IS HIE KEY) ТҮРЕ UPC YS HIE KEY 

ж"  EXPORTING 

ж REFERENCE(ET HIE NODES) TYPE UPC YT HIESEL 
ж" EXCEPTIONS 

ж" FAILED 


DATA:1 hie nodes wa TYPE upc. ys hiesel. 
* 清空 输出 表 

CLEAR et_hie_nodes. 
* 文 本 节点 ASIA 


1 hie nodes ма- chanm -is Ше Кеу – chanm. 
1 hie nodes, ма- hienm = 15 hie key — hienm. 
1 hie nodes wa - hiever = 15 hie key – hiever. 
1 hie nodes. wa - dateto = 15 hie key - dateto. 
1 hie. nodes. wa — nodename = ASIA. 

1 hie. nodes. wa - hiecha = OHIER, NODE . 


] hie nodes wa – dummy. leaf = . 
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INSERT 1 hie, nodes wa INTO TABLE et, hie. nodes. 


ENDFUNCTION. 


4) 处 理 类 型 为 Exit 的 指标 变量 设置 ， 具体 如 图 8-6 所 示 。 


计划 范围 - 基本 [SINORCO1| [siINO 第 一 个 计划 范围 FO 


属性 жин sS +s ， 特征 关系 


Diz mim) ew lm) ЛЕ А 重 置 类 型 用 户 出 口 a 
те 

类 型 | 变 里 描述 SER 1 功能 模块 名 称 | ШРЕ VARIABLE USER EXIT, VKVAL Ea 
% “根据 属性 确定 物料 VWLSX 

da | 公司 代码 HGSDM 

Æ жете VWL 

国 Eha VKVAL 

| 8-6 ”处 理 类 型 为 Exit 的 指标 变量 设置 


处 理 类 型 为 Exit 的 指标 变量 功能 模块 ， 其 代码 如 下 : 


FUNCTION zupf_variable_user_exit_vkval. 


ж" æ" Local interface; 


ж"  [MPORTING 


ж VALUE(I AREA) ТҮРЕ UPC Y AREA 

x" VALUE(I_VARIABLE) TYPE UPC_Y_VARIABLE 

ж" EXPORTING 

ж REFERENCE(E NUM VALUE) ТҮРЕ UPC Y УАК NUMBER 
ж" REFERENCE(E NUM NO VALUE) ТҮРЕ BOOLE D 


* 清空 输出 参数 
CLEAR e num value. 
CLEAR e. num, no, value. 


* 赋值 


e num value = 10. 


ENDFUNCTION. 


8.2.2 BW -IP 中 的 变量 实施 


虽然 前 面 章 节 已 经 对 BW - IP 的 变量 进行 了 阐述 ,但 是 在 很 多 时 候 ， 在 使 用 BW -IP HJ, 
还 是 需要 结合 BW -BPS 的 功能 达成 既定 目标 ， 如 读 取 BW - BPS 的 变量 来 确定 BW — IP 的 
变量 ,或 直接 设 定 BW -BPS 的 变量 。 同 时 需要 明白 的 是 ， 只 有 BPS 能 够 存储 与 用 户 相 关 的 


М 
7 
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变量 ， 这 个 特性 在 BW - IP 中 是 没有 的 。 
示例 : 读 取 BPS 中 的 变量 ， 具 体 代 码 如 下 。 


* ТЕҢИ BPS 变量 的 值 
IF i vnam(1) = V. 
DATA:l s variable TYPE upc. y. variable, 


1 ѕ area TYPE upc. y. area. 

DATA :r var TYPE REF TO cl. sem variable, 
Шо. value TYPE upc. yto charsel, 
1 s value LIKE LINE OF 10 value. 

1 s area = SINORCOI . 


18 variable 2i vnam. 


CALL METHOD cl, sem variable = > get. instance 


EXPORTING 

і area -] s area 

i variable -і1 s variable 
RECEIVING 

rr variable =г var 
EXCEPTIONS 

not existing = 1 

OTHERS 22. 


CALL METHOD т var -> get. user restriction 
RECEIVING 


rto. value = Шо. value. 


IF LINES( Ію value ) -0. 


CALL METHOD г var -> get. value 
RECEIVING 
rto. value = Шо value 
EXCEPTIONS 
error =1 


OTHERS =2. 


ENDIF. 


ENDIF. 


LOOP AT Ito. value INTO 1. s value. 
MOVE - CORRESPONDING 1. s value TO 1 s range. 
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APPEND 1, s range TO е t range. 
ENDLOOP. 


8.3 ”对 特性 派生 的 ABAP 应 用 实施 


特性 衍生 АВАР 例 程 在 BW - BPS 中 有 3 个 典型 的 用 法 : 

1) 系统 可 以 检查 两 个 不 同 的 特性 之 间 的 组 合 是 否 符合 业务 规则 。 

2) 如 果 选 择 类 似 “ 所 有 可 能 的 特性 组 合 ”的 设置 ， 则 系统 可 以 根据 相应 的 业务 规则 产 
生 一 组 符合 要 求 的 特性 组 合 。 

3) 最 经 常 的 用 法 就 是 ， 根 据 一 定 的 规则 从 一 个 特性 派生 出 另外 一 个 特性 的 值 。 例 如 ， 
根据 物料 派生 出 物料 组 、 根 据 日 历年 /月 派生 出 日 历年 和 日 历 月 等 。 这 个 功能 在 实际 项 目 中 
非常 有 用 ， 如 日 历年 和 日 历 月 可 以 不 包含 在 计划 层次 中 ,但 是 希望 在 数据 更 新 时 其 能 自动 
更 新 。 


8.3.1 BW -BPS 中 的 特性 派生 


BW - BPS 中 的 特性 派生 一 般 都 存在 于 基本 计划 范围 上 。 派 生 规则 可 以 根据 基本 特性 
派生 出 特性 的 属性 ， 如 根据 物料 派生 出 物料 组 ， 也 可 以 根据 层次 结构 进行 派生 ， 如 对 物 
料 建立 层次 结构 ， 父 级 节点 是 物料 组 。 本 节 主 要 讨论 基于 功能 退出 Exit 所 进行 的 特性 值 

为 了 达到 通过 Exit 进行 特性 值 派生 的 目的 ， 需 要 按照 以 下 步骤 进行 实施 。 

第 1 步 : 进入 计划 范围 修改 界面 ， 选 择 “ 特 征 关 系 ” 标 签 页 ， 如 图 8-7 所 示 。 


计划 范围 -基本 SINORCO1 | |6INO 第 一 个 计划 范围 


— E at auc AMINO т _ 


========== [257] 


к | 四 | 四 | 加 | C9 | EP | 四 | 加 | C9 | ES | E | E 
Jussonezan 


图 8-7 “特征 关系 ”标签 页 
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议 列 表 ;“ 衍 生 ， 合 并 和 建议 ”"， 需 要 输入 “ 源 特性 ”和 “目标 特性 ”。BPS 提供 了 3 个 标准 


的 退 


第 2 步 : 在 “类 型 ”上 ,通过 下 拉 列 表 选 择 “ 退 出 ”选项 ， 如 图 8-8 МЖ. 


属性 
退出 
参考 数据 
层次 结构 


55 


8-8 处 理 类 型 选择 


第 3 步 : 单 击 细 目 视图 图 标 ， 进 入 派生 关系 维护 界面 ， 如 图 8-9 所 示 。 
Eit , 数据 片 пе , +a ADI 


gy 特征 关系 | 
Qe 合并 检查 和 建议 
特征 


Оля, 合并 检查 和 建议 


源 特征 | 
目标 特征 | 
FM: 派生 


Рм: ЗА 
FM: 组 合 检查 


图 8-9 派生 关系 维护 界 画 


JE 


此 界面 中 有 两 个 单 选 按钮 :“ 合 并 检查 和 建议 ”能 够 对 特性 和 特性 组 进行 检查 和 产生 建 


出 函数 作为 参考 ， 分 别 是 : 
UPF_TIME_EXIT_FISC_DERIVE 特性 值 派 生 
UPF TIME EXIT FISC CREATE ”特性 值 组 合 建议 
UPF TIME EXIT FISC. CHECK 特性 值 合 并 检查 


以 下 就 3 种 不 同类 型 的 Exit 进行 举例 说 明 。 
示例 : 特性 值 派生 ， 代 码 如 下 。 


FUNCTION zupf_derivation_exit_time. 


ж 


ж" ж "Local interface; 


IMPORTING 


ж 


REFERENCE(I AREA) ТҮРЕ ОРС Y AREA 
REFERENCE(ITO CHA) TYPE UPC YTO CHA 
REFERENCE(ITO SOURCE) TYPE ОРС YTO CHA 
REFERENCE(ITO TARGET) TYPE UPC YTO CHA 
CHANGING 
REFERENCE(XS CHAS) TYPE АМҮ 
EXCEPTIONS 
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5 FAILED 
"E 
DATA:l calyear(4) TYPE n, 
] calmonth2(2) TYPE n, 
1 calmonth(6) TYPE n. 
FIELD - SYMBOLS: « calyear >, 


< calmonth2 >, 


< calmonth >. 


ASSIGN COMPONENT OCALYEAR OF STRUCTURE xs chas ТО «calyear >. 
ASSIGN COMPONENT OCALMONTH2 OF STRUCTURE xs, chas ТО < calmonth2 >. 
ASSIGN COMPONENT OCALMONTH OF STRUCTURE xs chas TO < calmonth >. 


IF «calmonth2 > IS ASSIGNED AND < calmonth > IS ASSIGNED. 
IF «calmonth > IS NOT INITIAL. 
< calmonth2 > = < calmonth > +4(2). 
ENDIF. 
ENDIF. 


IF «calyear > IS ASSIGNED AND < calmonth > IS ASSIGNED. 
IF «calmonth > IS NOT INITIAL. 
< calyear > = < calmonth > +0(4). 
ENDIF. 
ENDIF. 


ENDFUNCTION. 


示例 : 特性 值 组 合 建议 ， 代 码 如 下 。 


FUNCTION zupf suggestion, exit. time. 


ж" ж "Local interface: 


ж" IMPORTING 


жн REFERENCE(I AREA) ТҮРЕ UPC Y AREA 

жн REFERENCE(ITO CHA) ТҮРЕ UPC YTO CHA 

жн REFERENCE(ITO CHASEL) ТҮРЕ UPC YTO CHASEL 
ж" EXPORTING 

ж REFERENCE(ETH CHAS) ТҮРЕ HASHED TABLE 

ж" EXCEPTIONS 

ж" FAILED 


343 


FIELD -SYMBOLS: «ls cha» ТҮРЕ upc. ys cha. 


DATA:ls chamg ТҮРЕ upc. ys charng, 
ls chasel ТҮРЕ upc. ys chasel,, 
Шо. chasel TYPE upc. yto. chasel. 


DATA:lto calyear ТҮРЕ upc. yto chavl, 
Шо. calmonth2 ТҮРЕ upc. yto chavl, 
Шо. calmonth ТҮРЕ upc. yto, chavl. 


FIELD -SYMBOLS: « ls calmonth > ТҮРЕ upc. ys. chavl, 
< ls. calmonthl2 > TYPE upc. ys chavl, 
< ls calyear > TYPE ире. ys chavl, 
«] calmonth, calmonth2 > ТҮРЕ ANY, 

«] calmonth, calyear > TYPE ANY, 
«] calyear > TYPE ANY, 
< l calmonth2 > TYPE ANY, 
< l calmonth > TYPE ANY. 


DATA :lrs chas TYPE REF TO data. 
FIELD -SYMBOLS: «ls chas» ТҮРЕ ANY, 
«ls chavl > TYPE ANY. 


CLEAR : eth, chas. 


ж 检查 选取 的 特性 中 是 否 有 0CALMONTH , 如 果 没 有 , 则 直接 报错 并 退出 
READ TABLE ito_cha TRANSPORTING NO FIELDS 
WITH TABLE KEY chanm = OCALMONTH . 
IF sy - subre <> 0. 
MESSAGE e306(upf) RAISING failed. 
ENDIF. 


LOOP AT ito cha ASSIGNING «ls cha >. 
IF «ls cha» -chanm(3) <> OCAL . 
MESSAGE e305(upf) WITH «ls cha» - chanm RAISING failed. 
ENDIF. 
ENDLOOP. 


CREATE DATA Irs chas LIKE LINE OF eth. chas. 
ASSIGN lrs chas -> * TO «ls chas >. 
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UNASSIGN: «1 calmonth >, 
«] calmonth2 >, 


«] calyear >. 


ж 准备 处 理 6 位 的 0CALMONTH 
READ TABLE ito_cha TRANSPORTING NO FIELDS 
WITH TABLE KEY chanm + OCALMONTH . 
IF sy - subrc -0. 
ASSIGN COMPONENT OCALMONTH 
OF STRUCTURE «ls chas » 
TO «l calmonth >. 
CALL FUNCTION UPC CHA, VALUES GET 


EXPORTING 

1 area ші area 

i chanm = OCALMONTH 

ito. chasel = Шо chasel 

i check authority LX 
IMPORTING 

eto. chavl = Шо calmonth 
EXCEPTIONS 

chanm, not, found ES! 

тіс. error =2 

failed =3 

OTHERS -4. 


IF sy — subre <>0. 
MESSAGE ID sy – msgid TYPE sy – msgty NUMBER sy - msgno 
WITH sy — msgvl sy - msgv2 sy — msgv3 sy - msgv4 
RAISING failed. 
ENDIF. 
ENDIF. 


* 准备 处 理 两 位 的 0CALMONTH2 
READ TABLE ito_cha TRANSPORTING NO FIELDS 
WITH TABLE KEY chanm 上 OCALMONTH2 . 
IF sy - subre -0. 
ASSIGN COMPONENT OCALMONTH2 
OF STRUCTURE «ls chas » 
TO «l calmonthb2 >. 
CALL FUNCTION UPC CHA, VALUES. GET 


EXPORTING 
] area ші area 
i chanm = OCALMONTH2 
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ito. chasel = Шо chasel 


i check authority = X 


IMPORTING 

eto. chavl - |to. calmonth2 
EXCEPTIONS 

chanm not found -1 

тіс. error =2 

failed =3 

OTHERS -4. 


IF sy - subre <>0. 
MESSAGE ID sy — msgid TYPE sy — msgty NUMBER sy - msgno 
WITH sy — msgvl sy - msgv2 sy — msgv3 sy - msgv4 
RAISING failed. 
ENDIF. 
ENDIF. 


* 准备 处 理 4 位 的 0CALYEAR 
READ TABLE ito. cha TRANSPORTING NO FIELDS 
WITH TABLE KEY chanm = OCALYEAR . 
IF sy - subrc -0. 
ASSIGN COMPONENT OCALYEAR 
OF STRUCTURE «ls chas > 
TO «1l calyear >. 
CALL FUNCTION UPC CHA, VALUES GET 


EXPORTING 
] area ші area 
i chanm + OCALYEAR 
ito. chasel = Шо chasel 


i check authority = X 


IMPORTING 

eto. chavl = lto_calyear 
EXCEPTIONS 

chanm, not, found ES! 

rfc, error -2 

failed =3 

OTHERS -4. 


IF sy - subre <>0. 
MESSAGE ID sy — msgid TYPE sy — msgty NUMBER sy - msgno 
WITH sy — msgvl sy — msgv2 sy — msgv3 sy - msgv4 
RAISING failed. 
ENDIF. 
ENDIF. 
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IF <І calmonth > IS ASSIGNED. 


LOOP AT Ito. calmonth ASSIGNING «ls calmonth >. 
* 对 FISCPER 进行 循环 处 理 
IF «1 calmonth2 > IS ASSIGNED. 
* OCALMONTH2 填充 
ASSIGN «ls, calmonth > - chavlint +4 TO «1. calmonth, calmonth2 > 
CASTING LIKE «1 calmonth2 >. 
READ TABLE Ito, calmonth2 TRANSPORTING NO FIELDS 


WITH TABLE KEY chavlint = «1. calmonth, calmonth2 >. 


IF sy -subrc <> 0. 
CONTINUE. 
ENDIF. 
ENDIF. 
IF «1 calmonth » IS ASSIGNED. 
* OCALYEAR 填充 
ASSIGN «ls calmonth > -chavlint ТО «1 calmonth, calyear > 
CASTING LIKE «1l calyear >. 
READ TABLE lto_calyear TRANSPORTING NO FIELDS 
WITH TABLE KEY chavlint = «1 calmonth, calyear >. 
IF sy - subre <>0. 
CONTINUE. 
ENDIF. 
ENDIF. 
ж 如 果 运 行 到 此 处 , 则 记录 正确 
CLEAR «ls chas >. 
«] calmonth > = «ls calmonth > - chavlint. 


IF «l1 calmonth2 > IS ASSIGNED. 
* OCALMONTH2 填充 
<] calmonth2 > = «1 calmonth, calmonthb2 >. 
ENDIF. 


IF «1 calyear > IS ASSIGNED. 
* OCALYEAR 填充 
«] calyear > = «l1 calmonth, calyear >. 


ENDIF. 


INSERT «ls chas » INTO TABLE eth. chas. 


ENDLOOP. 
ENDIF. 


ENDFUNCTION. 
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示例 : 特性 值 合并 检查 ， 代 码 如 下 。 


FUNCTION zupf_check_exit_time. 


ж" æ" Local interface; 


ж"  [MPORTING 


ж REFERENCE(I AREA) ТҮРЕ UPC Y AREA 

ж REFERENCE(IS CHAS) ТҮРЕ ANY 

ж REFERENCE(ITO CHA) ТҮРЕ UPC YTO CHA 

жн REFERENCE(ITO CHASEL) TYPE UPC ҮТО CHASEL 
ж" — EXCEPTIONS 

жн INVALID 


FIELD -SYMBOLS: < calmonth2 > TYPE ANY, 
< calyear > TYPE ANY, 
« calmonth » TYPE ANY. 


* OCALMONTH ( 如果 没有 0CALMONTH , 则 不 需要 进行 任何 检查 ) 
READ TABLE ito cha WITH TABLE KEY chanm = OCALMONTH 
TRANSPORTING NO FIELDS. 
CHECK :sy – subrc = 0. 


ASSIGN COMPONENT OCALMONTH OF STRUCTURE is chas ТО < саітопіћ >. 
CHECK :sy - subrc -0. 


* OCALMONTH2 
ж 对 比 0CALMONTH2 的 值 和 0CALMONTH 的 值 
READ TABLE ito cha WITH TABLE KEY chanm = OCALMONTH2 
TRANSPORTING NO FIELDS. 
IF sy - subrc -0. 
ASSIGN COMPONENT OCALMONTH2 OF STRUCTURE is chas TO < calmontl2 >. 
CHECK :sy - subrc -0. 
IF «calmonth > +4(2) <> < calmonth2 >. 
MESSAGE e302(upf) WITH < calmonth > +4(2) «calmonth > < calmonth2 > 
RAISING invalid. 
ENDIF. 
ENDIF. 


* OCALYEAR 
* 对 比 OCALYEAR 的 值 和 0CALMONTH 的 值 
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READ TABLE ito cha WITH TABLE KEY chanm = OCALYEAR 
TRANSPORTING NO FIELDS. 
IF sy - subre = 0. 
ASSIGN COMPONENT OCALYEAR OF STRUCTURE is, chas TO < calyear >. 
CHECK :sy – subrc = 0. 
IF «calmonth > (4) <> < calyear >. 
MESSAGE e303(upf) WITH < calmonth > (4) «calmonth > <calyear > 
RAISING invalid. 
ENDIF. 
ENDIF. 


ENDFUNCTION. 


8.3.2 BW -IP 中 的 特性 派生 


BW - IP 中 的 特性 派生 同 BW - BPS 的 派生 类 似 ， 只 不 过 BW - IP 不 是 使 用 一 个 或 多 个 
Exit 进行 派生 ， 而 是 使 用 АВАР OO 类 的 方式 进行 派生 ， 因 此 必须 新 建 属于 自己 的 类 ， 同 时 
在 Planning Modeler 中 输入 该 类 。 

在 很 多 项 目 中 ， 我 们 都 会 遇 到 是 使 用 BW - BPS 还 是 使 用 BW – IP 的 问题 ,或 是 否 同时 
使 用 旧 的 BW - BPS 和 新 的 BW -了 耳 。 为 了 达到 演示 的 目的 ， 本 处 的 代码 逻辑 尽量 和 之 前 的 
代码 逻辑 保持 一 致 ， 具 体 步 又 如 下 。 

第 1 步 : 在 SE19 中 新 建 类 ZCL_IP_CHAR_DERIVE_SAMPLE， 在 新 建 类 时 ,需要 输入 
CL_RSPLS_CR_EXIT_BASE， 以 作为 新 建 类 的 超 类 ， 如 图 8-10 所 示 。 


区 创建 类 别 ZCL IP CHAR DERIVE SAMPLE x 
类 别 ZCL IP CHAR DERIVE SAMPLE | 

超 类 CL RSPLS CR EXIT BASE B 
说 明 

Instantiation 2 š 

Class Type 


@ Usual АВАР Class 
O Exception Class 
With Message Class 
O Persistent class 
O Test Class (ABAP Unit) 


最 后 
LR fea 


v^ 保存 


到 8-10 创建 类 ZCL IP. CHAR. DERIVE SAMPLE 


78 22b. 在 新 建 的 类 中 ， 能 够 看 到 3 个 方法 ， 分 别 对 应 到 之 前 BW - BPS 的 3 个 不 同 的 


Exit, CUE: 
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IF RSPLS CR. METHODS - CHECK 对 特性 值 组 合 进 行 合 并 检查 
IF_RSPLS_CR_METHODS ~ DERIVE 对 特性 组 合 进 行 建议 
IF RSPLS CR. METHODS ~ CREATE 对 特性 值 进行 派生 


(1) 方法 IF RSPLS. CR. METHODS ~ CHECK 
本 方法 用 来 检查 特性 值 的 组 合 是 否 符合 业务 规则 ， 如 物料 和 物料 组 组 合 的 检查 ， 日 历 
年 /月 和 日 历年 组 合 的 检查 等 。 此 方法 的 输入 /输出 参数 如 图 8-11 所 示 。 


Chss Interface (ZCL IP CHAR DERIVE SANPLE — |езәй/ 


I S CHAS Importing [1| П Туре ANY Merkmalskombination 
E T MESG| Exporting 口 | 口 Type IF RSPLS CR TYPE: Meldungen 
E IS VALID Exporting Ivi | ГІ Туре RS BOOL Boolean 


8-11 方法 CHECK 的 参数 列表 


HB, 15 CHAS 参数 包含 了 当前 计划 的 特性 (不 包括 指标 ); E IS VALID 参数 为 检查 
的 返回 结果 ， 如 果 特 性 值 的 组 合 是 符合 规则 的 ， 则 该 参数 的 值 为 “X”， 如 果 不 符合 规则 ， 
则 特性 值 为 空 ; E T MESG 参数 包含 了 需要 报错 处 理 的 临时 消息 。 

由 于 该 检查 经 常 被 调用 到 ， 且 检查 的 规则 可 能 十 分 复杂 ， 因 此 最 好 使 用 缓存 的 方式 对 数 
据 进 行 处 理 ， 也 正 因 如 此 ， 标 准 的 示例 代码 中 使 用 到 了 缓存 技术 。 

示例 : 面向 对 象 的 方法 IF_RSPLS_CR_METHODS ~ CHECK， 代 码 如 下 。 


METHOD if rspls cr methods ~ check. 


* | ——» i s chas characteristics combination 

* <-- e t mesg messages 

* «-- e is valid flag, record is valid or not 

ж ж 
* 系统 代码 段 


DATA:l s mesg TYPE if rspls cr types = >tn_s_mesg. 


FIELD -SYMBOLS: «1 th buf > TYPE HASHED TABLE, 
«ls buf» TYPE ANY. 
CLEAR e t mesg. 


IF o use buffer 2 rs c true. 
ASSIGN o. r th buf -> * ТО «I th buf». 
ASSIGN o r s buf -> * TO «1 s buf». 
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«ls buf» zi s chas. 
READ TABLE <1 th buf > INTO «1 s buf» FROM <l s buf». 
IF sy - subrc -0. 
e is valid = o r is valid -> ж. 
IF e is valid = rs с false AND e 1 mesg IS SUPPLIED. 
APPEND o r s mesg -» * TO e t mesg. 
ENDIF. 
RETURN. 
ENDIF. 
ENDIF. 
ҮЗІ 
FIELD -SYMBOLS: < calyear> ТҮРЕ ANY, 
« calmonth2 » TYPE ANY, 
< calmonth > TYPE ANY. 


* 日 历年 / 
ASSIGN COMPONENT OCALMONTH OF STRUCTURE i s chas TO < calmonth >. 
CHECK :sy – subrc = 0. 

* 日 历 月 
ASSIGN COMPONENT 0CALMONTH2 OF STRUCTURE i s chas TO < calmonth2 >. 
CHECK :sy – subrc = 0. 


IF «calmonth > +4(2) <> <calmonth2 >. 
1 s mesg- msgty = Е. 
1 s mesg - msgid = z Бір. 
1.8 mesg - msgno = 001. 
1 s mesg - msgv] = «calmonth >. 
1 s mesg -msgvl = < саітопіћ2 >. 
APPEND 1, s mesg TO e 1 mesg. 
e is valid = rs с false. 
ELSE. 
e is valid = rs c true. 
ENDIF. 
* 日 历年 
ASSIGN COMPONENT OCALYEAR OF STRUCTURE i в chas ТО < calyear >. 
CHECK :sy - subrc = 0. 
IF «calmonth > +0(4) <> <calyear >. 
18 mesg- msgty = Е. 
1 s mesg - msgid = z Бір. 
1.8 mesg — msgno = 002 . 
1 s mesg - msgv] = «calmonth >. 
1.8 mesg - msgvl = < calyear >. 
APPEND 1, s mesg ТО e 1 mesg. 
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e is valid = rs c false. 
ELSE. 
e is valid = rs c true. 
ENDIF. 
ж 系统 代码 段 
IF o_use_buffer = rs c true. 


o r is valid -> * -е is valid. 


IF o r is valid -> * -rs c false AND e t mesg IS SUPPLIED. 
o rs mesg—» * =] s mesg. 
APPEND 1 s mesg TO e t mesg. 

ENDIF. 

INSERT «1 s buf > INTO TABLE «l th buf». 


ENDIF. 


ENDMETHOD. 


(2) 方法 IF RSPLS CR. METHODS ~ CREATE 


与 BW - BPS 一 样 ， 本 方法 用 来 建议 所 有 合理 的 特性 组 合 ， 如 所 有 符合 要 求 的 物料 和 物 
料 组 的 组 合 建议 。 此 方法 的 输入 /输出 参数 如 图 8-12 所 示 ， 例 外 参数 设置 如 图 8-13 所 示 。 
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= 
类 别 (C) 编辑 (E) 转 到 (6) 实用 程序 (U) Environment 系统 (Y) 帮助 (H) 


vj 10 eae CDHE meus rb @ 
类 别 制作 器 : 显示 类 别 ZCL IP CHAR DERIVE SAMPLE 
7| fea) es] | e] v fel] |ы Г ПЛЕН 


Class Interface (ІСІ. IP CHAR DERIVE SAMPLE 已 实现 / 


е an den Datamanager 
Meldungstabelle 
| Merkmalskombinationen 


图 8-12 方法 CREATE 的 参数 列表 


= 
类 别 (C) 编辑 (E) FG) ”实用 程序 (U) Environment 系统 (Y) $9Bh(H) 
[> 


显示 类 Ке ZCL IP CHAR DERIVE SAMPLE 


Class Interface [ZCL IP CHAR DERIVE SAMPLE | езй / 


Method n CREATE ЕМ 
4: Methods [о Parameters [fe] |В) [afi] | СІРІ M exceoton casses 


FX RSPLS F. [-)thode ist fehlgeschlagen 
8-13 方法 CREATE 的 例外 参数 设置 


Hob, L'TSX SELDR 参数 包含 了 特性 的 选择 值 ， 仅 能 从 这 些 选择 值 中 来 进行 组 合 的 建 
议 。 尽 管 LTSX_SELDR 参数 比较 复杂 ， 但 是 我 们 仅 需要 考虑 两 个 内 容 ， 即 CHANM 字段 和 
RANGE 结构 ，RANGE 中 包括 了 以 RANGES 格式 存储 的 CHANM 的 值 。E_TH_CHAS 参数 是 
程序 最 终 返回 的 符合 业务 规则 的 特性 值 组 合 ， 该 表 是 一 个 HASHED TBALE， 因 此 读 取 性 能 
较 好 。 如 果 返 回 表 E_TH_CHAS 为 室 ， 则 说 明 所 有 的 组 合 都 是 符合 规则 的 。E_T_MESG 参数 
包含 了 需要 报错 处 理 的 临时 消息 。 

示例 : 面向 对 象 的 方法 IF. RSPLS_CR_METHODS ~ CREATE ,代码 如 下 。 


METHOD if_rspls_cr_methods ~ create. 


ж ж 
ж -->і tsx seldr selection criteria 

* — «—— e t mesg messages 

* <-- e th chas valid combinations 


* <<- cx rspls failed exception 


* 系统 标准 代码 
FIELD ~ SYMBOLS: «1 th. buf > TYPE HASHED TABLE, 
«ls buf» TYPE ANY, 
«ls chas > ТҮРЕ ANY. 


CLEAR e t mesg. 
CLEAR e th chas. 


* 自 定义 代码 
FIELD -SYMBOLS: < calmonth2 > TYPE ANY, 
< calyear > ТҮРЕ ANY, 
«calmonth > ТҮРЕ ANY, 
«f сһав > ТҮРЕ ANY, 
« f. seldr > TYPE rsdd, вх seldr, 


<Í range > TYPE rrrangesid. 


DATA:1 tr саіуеаг TYPE RANGE OF /bi0/oicalyear, 
1 tr. calmonth TYPE RANGE OF /bi0/oicalmonth , 
] tr calmonth2 TYPE RANGE OF /bi0/oicalmonth2 , 
1 sr calyear LIKE LINE OF 1 tr calyear, 
1 sr. calmonth LIKE LINE OF 1 tr calmonth, 
1 sr. calmonth2 LIKE LINE OF 1 tr calmonth2. 


DATA :1 d calyear TYPE /biO/oicalyear, 
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1.4 саһпопіһ TYPE /bi0/oicalmonth , 
1 а calmonth2 TYPE /bi0/oicalmonth2. 


DATA :l s chas TYPE REF TO data. 


CREATE DATA I s chas LIKE LINE OF e th chas. 
ASSIGN ls chas-» * TO «f chas >. 

* 日 历年 / 
ASSIGN COMPONENT OCALMONTH OF STRUCTURE «f chas > TO <calmonth >. 
CHECK sy – subrc = 0. 

* 日 历年 
ASSIGN COMPONENT OCALYEAR OF STRUCTURE «f сһаѕ > TO «calyear >. 
CHECK sy - subrc = 0. 

* 日 历 月 
ASSIGN COMPONENT OCALMONTH2 OF STRUCTURE «f chas» TO <calmonth2 >. 
CHECK sy - subrc = 0. 


LOOP AT 1 tsx seldr ASSIGNING «f seldr >. 
* 日 历年 / 
IF «f seldr > — chanm + Ocalmonth . 
LOOP AT «f seldr > — range — range ASSIGNING «f range >. 
MOVE - CORRESPONDING «f range > TO 1 sr calmonth. 
INSERT 1 sr calmonth INTO TABLE 1 tr calmonth. 
ENDLOOP. 
ENDIF. 
* 日 历年 
IF «f seldr > - chanm = Ocalyear . 
LOOP AT «f seldr > — range — range ASSIGNING «f range >. 
MOVE - CORRESPONDING «f range > TO 1 sr calyear. 
INSERT 1, sr. calyear INTO TABLE 1 tr calyear. 
ENDLOOP. 
ENDIF. 
* 日 历 月 
IF «f seldr > -chanm = Ocalmonth2 . 
LOOP AT «f seldr > — range — range ASSIGNING «f range >. 
MOVE - CORRESPONDING «f range > TO 1 sr calmonth2. 
INSERT 1 sr calmonth2 INTO TABLE 1 tr calmonth2. 
ENDLOOP. 
ENDIF. 


ENDLOOP. 


* create table 
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* 系统 标准 代码 
IF o. use buffer = rs c true. 
ASSIGN o. r th buf -> * TO <1 th buf >. 


ASSIGNors buf -> ж TO «ls buf». 
LOOP AT e th chas ASSIGNING «l s сһаѕ >. 

«ls buf > = <1 s chas». 

o r is valid -> * -rs c true. 

INSERT «1 s buf > INTO TABLE <1 th buf». 
ENDLOOP. 


ENDIF. 


ENDMETHOD. 


(3) 方法 IF. RSPLS CR. METHODS ~ DERIVE 

与 之 前 的 两 个 方法 相 比 ，DERIVE 方法 是 在 单个 记录 层面 对 特性 进行 处 理 ， 而 不 是 在 汇 
总 级 别 进行 读 取 。 和 CHECK 一 样 ， 特 性 值 的 派生 发 生 在 单独 的 数据 记录 上 ， 所 以 该 方法 的 
重要 性 不 言 而 喻 。 此 方法 的 输入 /输出 参数 如 图 8-14 所 示 ， 例 外 参数 设置 如 图 8-15 所 示 。 


= 
类 别 (C) 编辑 (E) 转 到 (6) 实用 程序 (U) Environment 系统 (Y) 帮助 (H) 


g іп eee Bm әзге mo 
类 别 制 作 器 : 显示 类 别 ZCL IP CHAR, DERIVE SAMPLE 
БМ БЫР CER dI s ТЕЛЕ d || у жа! | SES IEEE 


Class Interface |(ZCL IP CHAR DERIVE SAMPLE 已 实现 / 


图 8-14 方法 DERIVE 的 参数 列表 


类 别 (C) 编辑 (E) 转 到 (6) 实用 程序 (U) Environment 系统 (Y) 帮助 (H) 


2 ш eee na nas ma o 
类 别 制作 器 : 显示 类 别 2Сі IP CHAR DERIVE SAMPLE 
Бы | 168] 1 | [e| e] ЕЗ ЕЕЕ 


Class Interface ZCL IP CHAR DERIVE SAMPLE 已 实现 / 


[四 thode ist fehlgeschlagen 


8-15 方法 DERIVE 的 例外 参数 设置 
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Ж, CS CHAS 参数 和 LS_CHAS 参数 有 一 样 的 结构 ， 但 是 因为 需要 对 特性 的 值 进行 
派生 ， 所 以 使 用 了 作为 修改 结构 的 C_S_CHAS， 而 不 使 用 作为 输入 结构 的 LS_CHAS; E T. 
MESG 参数 包含 了 需要 报错 处 理 的 临时 消息 ; CX RSPLS FAILED 参数 奉 代 了 CHECK 方法 中 
的 E_IS_VALID 参数 ， 本 参数 只 有 在 出 现 严重 错误 和 非法 的 选择 条 件 时 才 会 被 触发 (如 
“FROM” 比 “TO” 还 大 ) ， 此 时 系统 完全 退出 计划 功能 。 

示例 : 面向 对 象 的 方法 IF_RSPLS_CR_METHODS ~ DERIVE, REUT, 


METHOD if_rspls_cr_methods ~ derive. 


ж * 
* <-- e t mesg messages 

* «-» c s chas characteristic combination :source and target 

ж fields included; do not change the source 

* fields 


* <<- cx rspls failed | exception 
* * 
ж 系统 标准 代码 
DATA:l s mesg ТҮРЕ if rspls cr types = > tn s mesg, 
1 is valid ТҮРЕ rs bool. 
FIELD -SYMBOLS: «1 th buf > TYPE HASHED TABLE, 
«ls buf» TYPE ANY. 
FIELD - SYMBOLS: « calmonth » TYPE ANY, 
<calyear > ТҮРЕ ANY, 
« calmonth2 > TYPE ANY. 


CLEAR e t mesg. 


IF o use buffer 2 rs c true. 


ASSIGN or th buf d-> * ТО <l th buf». 
ASSIGN o rs buf -> * TO «ls buf». 

«ls buf» -c s chas. 

READ TABLE <1 th buf > INTO <1 s buf» FROM «1 s buf». 


IF sy - subre -0. 


IF o г is valid -> * -rs c true. 
с в сһав- <1 s buf». 
RETURN. 
ELSE. 
IF e t mesg IS SUPPLIED. 
APPEND o. r s mesg -> * TO e t mesg. 
ENDIF. 
RAISE EXCEPTION TYPE сх. тері failed 
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EXPORTING 
msgid = o r s mesg – > msgid 
msgty = o r s mesg 一 > msgty 
msgno = 0 r s mesg 一 > msgno 
msgvl -о г s mesg —» msgvl 
msgv2 -о г s mesg —» msgv2 
msgv3 -о г s mesg 一 > msgv3 
msgv4 -о r s mesg —» msgv4. 


ENDIF. "IF o r is valid -> * -rs c true. 
ENDIF. "IF sy — subrc -0. 


ENDIF. "IF o use buffer = rs c. true. 

* 自 定义 代码 
ASSIGN COMPONENT OCALYEAR OF STRUCTURE с s chas ТО < calyear >. 
CHECK sy - subrc = 0. 
ASSIGN COMPONENT OCALMONTH2 OF STRUCTURE с s chas ТО < calmonth2 >. 
CHECK sy – subre = 0. 
ASSIGN COMPONENT OCALMONTH OF STRUCTURE c. s chas ТО < calmonth >. 
CHECK sy - subrc = 0. 


IF «calmonth2 > IS ASSIGNED AND < calmonth > IS ASSIGNED. 
IF «calmonth > IS NOT INITIAL. 
< calmonth2 > = «calmonth > 4 4(2). 
ENDIF. 
ENDIF. 


IF «calyear > IS ASSIGNED AND < calmonth > IS ASSIGNED. 
IF «calmonth > IS NOT INITIAL. 
< calyear > = < calmonth > +0(4). 
ENDIF. 
ENDIF. 
* 系统 标准 代码 
IF o use buffer = rs c true. 
от is valid -> * =1 is valid. 
IF o r is valid -> * =15 c true. 
INSERT «1 s buf > INTO TABLE «l th buf». 
с в chas- «l s buf». 
ELSE. 
IF e t mesg IS SUPPLIED. 
or s mesg—» * -] s mesg. 


APPEND 1, s mesg TO e 1 mesg. 
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ENDIF. 

INSERT «1 s buf > INTO TABLE <1 th buf». 

RAISE EXCEPTION TYPE cx rspls failed 

EXPORTING 
msgid 2l s mesg — msgid 
msgty — 1 s mesg — msgty 
msgno 2l s mesg - msgno 
msgvl 2l s mesg - msgvl 
msgv2 =] s mesg - msgv2 
msgv3 -І s mesg - msgv3 
msgv4 -! s mesg - msgv4. 
ENDIF. 
ENDIF. 
ENDMETHOD. 


8.4 退出 功能 的 ABAP 应 用 实施 


8.4.1 BW -BPS 中 的 退出 功能 


在 BPS 中 ， 对 数据 进行 整体 处 理 有 3 种 不 同 的 形式 ， 即 标准 功能 、FOX 语句 和 Exit 2) 
能 函数 。 相 对 来 说 ， 标 准 功能 显得 更 加 简单 且 功 能 也 相对 单一 ;FOX 语句 在 功能 和 复杂 度 
上 要 高 于 标准 功能 ; Exit 功能 函数 则 拥有 最 高 的 复杂 度 和 最 为 强大 的 功能 。 三 者 的 关系 如 
图 8-16 所 示 。 


功能 和 复 


8-16 BPS 中 3 种 类 型 功能 的 关系 


BW - BPS 中 的 退出 功能 在 整个 BPS 的 实施 过 程 中 非常 重要 ， 因 为 有 时 需要 对 选择 的 数 
据 进 行 逐 条 处 理 。 例 如 ,我们 手工 输入 “销售 数量 ”和 “销售 价格 ”， 若 再 让 用 户 输入 销售 
金额 就 显得 不 那么 必要 了 ， 此 时 需要 系统 自动 计算 。 

Exit 退出 功能 包含 一 个 或 两 个 功能 函数 : 

第 一 个 功能 函数 是 必 输 项 ， 因 为 所 有 的 计算 逻辑 都 是 在 该 功能 函数 中 进行 实施 的 。 
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第 二 个 功能 函数 是 可 选 的 ， 如 有 时 希望 新 建 一 些 记录 ， 则 需要 使 用 该 功能 函数 。 
1) 初始 化 的 功能 模块 有 以 下 人 参数， 


D 输入 参数 
І AREA 计划 范围 
I PLEVEL 计划 等 级 
І РАСКАСЕ 计划 包 
I METHOD 计划 功能 
І PARAM 计划 功能 的 参数 组 
IT EXITP 参数 值 的 表 
ITO_CHASEL 计划 包 的 选择 条 件 
ITO_CHA 计划 等 级 的 特征 
ITO_KYF 计划 等 级 的 关键 值 
@ 输出 参数 
ETO_CHAS 对 象 关键 值 ( 用 户 可 以 使 用 对 象 类 
CL SEM, PLANAREA, ATTRIBUTES 来 获取 ) 
ET MESG 错误 消息 或 终端 用 户 的 消息 


参数 LAREA、L_PLEVEL、L_PACKAGE I METHOD ЯІІ PARAM 是 当前 功能 函数 
运行 的 环境 。 参 数 IT_EXITP 包含 了 在 “参数 退出 功能 ”中 设 定 的 参数 ， 预 估 在 参数 组 
中 对 应 的 属性 。 参 数 ITO_CHA 和 ITO_KYF 包含 了 在 计划 层次 中 选择 的 特性 和 关键 指 
标 。 没 有 包含 在 计划 层次 中 的 特性 不 会 出 现在 返回 表 ETO_CHAS 中 。 参 数 ITO. 
CHASEL 包含 了 在 计划 等 级 中 对 所 有 特性 的 限制 ， 用 户 新 增 的 记录 也 不 能 超出 这 个 限制 
条 件 。 例 如 ， 在 计划 层次 中 限制 了 公司 代码 1000 和 2000， 则 不 能 新 建 一 条 带 有 公司 代 
码 为 3000 的 数据 记录 。 参 数 ETO_CHAS 包含 了 特性 值 的 组 合 ， 删 除 ETO_CHAS 中 的 
数据 不 会 起 到 任何 作用 。 

2) 更 改 数据 的 功能 模块 有 以 下 参数 : 


(D 输入 参数 
I AREA 计划 区 域 
I PLEVEL 计划 等 级 
I PACKAGE 计划 包 
I METHOD 计划 功能 
І PARAM 计划 功能 的 参数 组 
ІТ EXITP 参数 值 表 
ITO. CHASEL 包 选 择 
ITO_CHA 计划 等 级 的 特征 
ITO_KYF 计划 等 级 的 关键 值 
D 输出 参数 
ET_MESG 错误 消息 或 终端 用 户 的 消息 
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@ 变更 表 


XTH_DATA 将 更 改 的 事务 数据 进行 记录 


和 初始 化 功能 模块 一 样 ,，I_AREA、I_PLEVEL、 I PACKAGE, I METHOD 和 I_PA- 
RAM 是 当前 功能 函数 运行 的 环境 。 参 数 IT_EXITP 包含 了 在 “参数 退出 功能 ”中 设 定 
的 参数 ， 预 计 在 参数 组 中 对 应 的 属性 。 参 数 ITO_CHASEL 包含 了 当前 特性 组 合 的 唯一 
特性 值 。 参 数 XTH_DATA 包含 了 当前 特性 组 合 的 所 有 数据 ， 该 表 是 一 个 哈 希 表 ， 以 所 有 的 
特性 作为 唯一 标识 。XTH_DATA 中 的 每 一 条 数据 均 包 含 两 个 结构 ， 即 S_CHAS MIS KYFS, 
在 S_CHAS 中 包含 了 计划 等 级 中 的 所 有 特性 ， 以 及 关键 指标 的 单位 和 货币 等 ，S_KYFS 中 包 
含 了 计划 范围 中 的 所 有 关键 指标 。 

如 果 需 要 新 建 记录 或 更 改 记录 ， 则 只 能 对 ITO_CHA 和 ITO_KYF 中 包含 的 对 象 进行 更 
Bp, 否则 系统 将 报错 。 对 于 XTH_DATA 的 访问 必须 使 用 FIELD - SYMBOL。 如 果 该 函数 只 
是 在 1 个 计划 范围 内 使 用 ， 则 可 以 使 用 表 类 型 /1SEM/_YTH_DATA_ < CLIENT > < PLAN- 
NINGAREA > ， 对 应 的 行 类 型 定义 是 /1SEM/_YS_DATA_ < CLIENT > < PLANNINGAREA >, 
系统 运行 完毕 后 ,会 将 目标 数据 和 当前 系统 的 数据 进行 对 比 ， 从 而 确定 增 量 以 添加 记录 。 

如 果 需 要 删除 记录 ， 则 可 以 从 XTH_DATA 中 删除 ， 也 可 以 将 所 有 关键 指标 的 值 都 
设置 为 “0”， 因 为 对 于 BW - BPS 而 言 ， 所 有 的 关键 指标 为 “0”， 则 视 为 该 记录 不 
存在 。 

对 于 功能 退出 函数 ， 假 如 测试 数据 如 图 8-17 所 示 ， 则 所 有 的 数据 只 有 数量 和 价格 ， 没 
有 金额。 


© = = 31860600 DAR 8008 Еж om 
"SINORCO1", 清单 输出 


图 ак ш а аш Еее BW 


'EQUID 


z Ў ЖЕ. | ORE 历年 ж/ж 
1001 1М-1 1М АРО RDDDIA6K79JGA29FLSFUTSLWSE 201201 1! 2012 СМҮ ТОМ 0.00 11.00 1 
1001 1М APO. RDDDIA6K79JGA29FLSFUTSLWSE 201202 2, 2012 СМҮ | TON 0.00 | 11.00 1 
1001 1M APO RDDDIA6K79JGA29FLSFUTSLWSE 201203 3 2012 CNY | TON 0.00 | 11.00 1 
1001 1M APO. RDDDIAGK79JGA29FLSFUTSLWSE 201204 4! 2012 СМҮ | TON 0.00 11.00 1 
1001 1М APO. RDDDIA6GK79JGA29FLSFUTSLWSE 201205 5, 2012 СМҮ | TON 0.00 | 11.00 1 
1001 1M APO. RDDDIAGK79JGA29FLSFUTSLWSE 201206 6| 2012 CNY | TON 0.00 | 11.00 1 
1001 1M APO. RDDDIAGK79JGA29FLSFUTSLWSE 201207 7 | 2012 СМҮ | TON 0.00 | 11.00 1 
1001 1M APO. RDDDIAGK79JGA29FLSFUTSLWSE 201208 8 2012 CNY | TON 0.00 | 11.00 1 
1001 1M APO RDDDIA6K79JGA29FLSFUTSLWSE 201209 9, 2012 CNY | TON 0.00 11.00 1 
1001 1M APO RDDDIA6K79JGA29FLSFUTSLWSE 201210 10 2012 СМҮ ТОМ 0.00 11.00 1 
1001 1M APO RDDDIA6K79JGA29FLSFUTSLWSE 201211 11 2012 CNY | TON 0.00 | 11.00 1 
1001 1M APO RDDDIA6K79JGA29FLSFUTSLWSE 201212 12 2012 |CNY | TON 0.00 | 11.00 1 
1001 1M- 1М APO. RDDDIAGK79JGA29FLSFUTSLWSE 201201 1 2012 CNY | TON 0.00 | 12.00 1 
1001 1M APO. RDDDIAGK79JGA29FLSFUTSLWSE 201202 2 2012 CNY | TON 0.00 | 12.00 1 
1001 1M APO. RDDDIA6K79JGA29FLSFUTSLWSE 201203 3, 2012 CNY | TON 0.00 | 12.00 1 
1001 1M APO. RDDDIAGK79JGA29FLSFUTSLWSE 201204 4! 2012 CNY | TON 0.00 | 12.00 1 
1001 1M APO. RDDDIAGK79JGA29FLSFUTSLWSE 201205 5, 2012 СМҮ | TON 0.00 | 12.00 š 
1001 1M APO. RDDDIAGK79JGA29FLSFUTSLWSE 201206 6| 2012 CNY | TON 0.00 | 12.00 1 
1001 1M APO. RDDDIAGK79JGA29FLSFUTSLWSE 201207 7, 2012 CNY | TON 0.00 | 12.00 1 
1001 1M APO. RDDDIAGK79JGA29FLSFUTSLWSE 201208 8 2012 CNY | TON 0.00 | 12.00 £ 
1001 1M APO RDDDIA6K79JGA29FLSFUTSLWSE 201209 9 2012 CNY | TON 0.00 12.00 1 
1001 1M APO_RDDDIA6K79]GA29FL5FUTSLWSE 201210 10 2012 СМҮ ТОМ 0.00 12.00 1 
1001 1М APO RDDDIA6K79JGA29FLSFUTSLWSE 201211 11| 2012 CNY ТОМ 0.00 12.00 1 
1001 1M APO RDDDIA6K79JGA29FLSFUTSLWSE 201212 12 2012 CNY | TON 0.00 | 12.00 1 


8-17 执行 前 的 测试 数据 
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我 们 需要 通过 Exit 退出 功能 对 单个 月 份 和 单个 物料 的 销售 金额 进行 计算 ， 即 销售 金额 = 
销售 数量 x 销售 价格 ， 需 要 按照 以 下 步骤 进行 设置 。 
第 1 步 : 在 预算 设置 界面 (BPS 界面 ) 双击 选择 一 个 计划 层次 ， 然 后 在 界面 左下 方 的 
“计划 功能 ”区 域 中 ， 单 击 鼠 标 右键 ， 选 择 “创建 计划 功能 ”选项 ， 如 图 8-18 所 示 。 
ЕС 编辑 (E) EGO НЕР) IAT) 系统 (Y) 者 助 (H) 
@ s 108/000 GAR лїї 1 e m 


显示 计划 等 级 RC01LV04 
关闭 导航 E| | | 计划 参数 文件 | | 全 局 计划 顺序 | газта 


计划 区 域 技术 名 称 计划 层次 [RCO1LYO4| [Rs 
v @ SINO 第 一 个 计划 范围 SINORCO1 
Y 日 历年 月 公司 代码 RC01LV04 
特别 包 0-ADHOC 
P 层次 结构 限制 公司 代码 RCO1LV03 
b 年度 物料 数 旺 价格 RCO1LV01 
P 年 度 物料 数量 价格 RCO1LV02 
и ri — — —|nin 
计划 功能 技术 名 称 
У иен Аш Щщ Т OT ERE 
创建 计划 只 能 0-MP 
创建 手动 计划 格 计 : LV04CLO1 
创建 计划 顺序 
创建 文档 
图 8-18 新 建 计划 功能 路 径 


第 2 步 : 在 弹出 的 “创建 计划 功能 ”对 话 框 中 输入 计划 功能 的 技术 名 称 ， 这 里 输入 
LV04CLO1， 并 输入 描述 “通过 当月 销售 数量 销售 价格 计算 销售 金额 ” ， 在 “所 有 功能 ”下 
选择 “退出 功能 ”选项 ， 如 图 8-19 所 示 。 

Я x 
计划 功能 [LVO4CLO1 | 通过 当月 销售 数量 销售 价格 计算 销售 金额 


二 所 有 功能 
从 发 送 方 到 接收 方 按 关键 字 分 配 
从 发 送 方 到 接收 方 按 参考 数据 分 配 
公式 
分 配 
т 
ше (无 效 合并 ) 
单位 转换 
基于 帐户 的 货币 换算 
复制 
复制 到 几 个 目标 对 象 
带 参 考 数据 分 配 
按 关键 字 分 配 


重 过 帐 (特性 关系 ) 
ШЫ 
EE й 


is 


8-19 新 建 退 出 功能 输入 参数 


361 


确定 后 进入 功能 函数 配置 界面 ， 在 功能 函数 输入 框 输入 包含 退出 逻辑 的 功能 函数 名 称 ， 
对 于 初始 化 功能 函数 ， 可 以 视 情况 决定 是 否 输入 。 由 于 此 人 处 不 涉及 新 增 记录 等 功能 ， 因 此 这 
里 仅 设置 退出 功能 为 ZUPF_EXIT_CALCULATE_XSJE。 如 果 我 们 还 希望 在 参数 组 中 设置 其 他 
参数 ， 则 可 以 在 “参数 退出 功能 ”中 添加 ， 本 处 不 需要 进行 任何 限定 ， 因 此 不 输入 参数 。 
右边 有 一 个 “要 更 改 的 字段 ”和 “字段 清单 ”， 这 两 个 参数 决定 了 实际 调用 函数 的 方式 。 例 
如 ， 有 如 下 数据 ， 具体 见 表 8-1。 
表 8-1 退出 功能 参数 设置 的 示例 数据 


公司 代码 ЕЛЕБЕЙЕ 销售 数量 销售 价格 销售 金额 
1000 2012/10 1 10 0 
1000 2012/11 2 10 0 
1000 2012/12 2 10 0 
2000 2012/09 4 10 0 
2000 2012/10 3 10 0 
2000 2012/11 4 10 0 
2000 2012/12 2 10 0 


方式 一 : 如 果 不 选 择 任何 字段 到 “要 更 改 的 字段 ”中 ， 将 所 有 字段 留 在 “字段 清单 ” 
中 ， 则 系统 会 调用 退出 功能 7 次 ， 每 次 处 理 一 条 数据 。 在 这 种 方式 下 我 们 无 法 创建 新 的 记 
录 ， 因 为 在 哈 希 表 中 只 能 有 一 个 KEY 组 合 。 

方式 二 : 如 果 将 “公司 代码 ”选择 到 “要 更 改 的 字段 ”中 ， 将 “日 历年 /月 ” 留 在 
“字段 清单 ”中 ， 则 系统 会 调用 退出 功能 4 次 ， 即 2012/09 的 数据 处 理 一 次 ，2012710 的 数 
据 处 理 一 次 ，2012711 的 数据 处 理 一 次 ，2012/12 的 数据 处 理 一 次 。 如 果 新 建 记录 ， 则 新 创 
建 的 记录 在 “日 历年 /月 ”的 值 上 必须 和 其 他 记录 保持 一 致 。 

方式 三 : 如 果 将 “日 历年 /月 ”选择 到 “要 更 改 的 字段 ”中 ,将 “公司 代码 ” 留 在 
“字段 清单 ”中 ， 则 系统 会 调用 退出 功能 两 次 ， 即 1000 公司 的 数据 处 理 一 次 ，2000 公司 的 
数据 处 理 一 次 。 如 果 新 建 记录 ， 则 新 创建 的 记录 在 “公司 代码 ”的 值 上 必须 和 其 他 记录 保 
持 一 致 。 

方式 四 : 如 果 将 所 有 的 字段 都 选择 到 “要 更 改 的 字段 ”中 ， 则 系统 会 调用 退出 功能 1 
次 ， 所 有 的 7 条 数据 都 将 在 这 次 调用 中 计算 。 此 时 ， 可 以 创建 尽 可 能 多 的 数据 记录 ， 只 要 对 
应 的 主 数据 存在 ， 如 主 数据 “公司 代码 ”。 

下 面 的 示例 代码 就 是 使 用 初始 化 函数 对 特性 值 组 合 进行 数据 的 增加 (和 后 续 的 数据 更 
改 不 属于 同一 个 计划 等 级 ) 。 


FUNCTION zupf_exit_calculate_xsje_init. 


ж" 


ж" ж "Local interface: 

ж"  [MPORTING 

ж REFERENCE(I AREA) TYPE UPC Y AREA 

x" REFERENCE(I_PLEVEL) TYPE UPC_Y_PLEVEL 
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ж REFERENCE(I PACKAGE) ТҮРЕ UPC Y PACKAGE 
ж REFERENCE(I METHOD) ТҮРЕ UPC Y METHOD 
ж REFERENCE(I PARAM) ТҮРЕ UPC Y PARAM 

ж REFERENCE(IT EXITP) ТҮРЕ ОРЕ YT EXITP 

ж REFERENCE(ITO CHASEL) ТҮРЕ UPC YTO CHASEL 
ж REFERENCE(ITO CHA) TYPE UPC YTO CHA 

жн REFERENCE(ITO KYF) ТҮРЕ UPC ҮТО КҮК 

ж"  EXPORTING 

ж REFERENCE(ETO CHAS) ТҮРЕ АМҮ TABLE 

ж REFERENCE(ET MESG) TYPE UPC YT MESG 

ж" EXCEPTIONS 

ж GOWLZ MISSING 


ж 


DATA :l в chasel TYPE црс. ys chasel, 


l s charng TYPE црс. ys charng. 
DATA:1 т gOwlz TYPE RANGE OF /bic/oig0wlz , 
1.8 gOwlz LIKE LINE OF lI. г gOwlz, 
18 ө0м1 TYPE /bic/pgOwl. 
* Client 812 计划 范围 SINORCOI 
DATA:1 s сһав TYPE /1sem/. ув chas 812віпогс01. 
* 根据 物料 组 选择 物料 范 上 
FIELD -SYMBOLS: < f_g0wlz > TYPE /bic/oigOwlz, 
«f g0wl > ТҮРЕ  /bic/oigOwl. 


I 
z 


ш 


* 物料 组 
ASSIGN COMPONENT GOWLZ OF STRUCTURE 1 s chas ТО «f gOwlz >. 
* 物料 
ASSIGN COMPONENT GOWL OF STRUCTURE 16 сһав TO «f g0wl >. 
ж 处 理 物料 组 
READ TABLE ito_chasel INTO 1l, s chasel WITH KEY chanm = COWLZ . 
IF sy - subre -0. 
RAISE e0wlz missing. 
ELSE. 
LOOP AT 1 s chasel — t. charng INTO 1 s. charng. 
MOVE - CORRESPONDING 1 s. charng TO 1. s. gOwlz. 
INSERT 1 s gOwlz INTO TABLE 1 г e0wlz. 
ENDLOOP. 
ENDIF. 
* 获取 物料 组 中 的 物料 
SELECT * INTO 1 s eOwl 
FROM /bic/pgOwl 
WHERE /bic/gOwlz IN 1 г gOwlz 
AND objvers A . 
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«f gOwlz > =] s gO0wl — /bic/gOwl. 

«f gOwlz > =] s egOwl —/bic/gOwlz. 

INSERT 1 s chas INTO TABLE eto. chas. 
ENDSELECT. 


ENDFUNCTION. 


下 面 的 示例 代码 使 用 了 Exi 退出 功能 模块 ， 对 当前 计划 范围 内 选择 数据 运行 公式 
“销售 金额 = 销售 数量 x 销售 价格 ” ( 和 前 叙 的 初始 化 不 属于 同一 个 计划 等 级 )， 代 码 
如 下 。 


FUNCTION zupf_exit_calculate_xsje. 


ж 


ж" æ" Local interface; 


ж" IMPORTING 


x" REFERENCE(I_AREA) TYPE UPC_Y_AREA 

ж" REFERENCE(I PLEVEL) TYPE UPC Y PLEVEL 

ж" REFERENCE(I METHOD) ТҮРЕ UPC Y METHOD 
ж REFERENCE(I PARAM) ТҮРЕ UPC Y PARAM 

ж" REFERENCE(I PACKAGE) ТҮРЕ UPC Y PACKAGE 
ж REFERENCE(IT EXITP) ТҮРЕ ОРЕ YT EXITP 

жн REFERENCE(ITO CHASEL) ТҮРЕ UPC ҮТО CHASEL 
ж REFERENCE(ITO CHA) ТҮРЕ UPC YTO CHA 

ж REFERENCE(ITO КҮК) TYPE ОРС ҮТО КҮК 

ж"  EXPORTING 

ж REFERENCE(ET MESG) TYPE UPC YT MESG 

ж" CHANGING 

ж" REFERENCE(XTH DATA) ТҮРЕ HASHED TABLE 


FIELD -SYMBOLS: < х data» TYPE ANY. 

FIELD -SYMBOLS: «s chas > TYPE ANY, 
«s kyfs > TYPE ANY. 

FIELD -SYMBOLS: < kOxssl > TYPE /bic/oikOxssl , 
< kOxsjg > TYPE /bic/oikOxsjg, 
< kOxsje > TYPE /bic/oikOxsje. 


LOOP AT хіһ data ASSIGNING <хіһ data >. 
* 处 理 特 性 
ASSIGN COMPONENT S CHAS OF STRUCTURE <xth_data > TO «s chas». 
CHECK sy – subrc = 0. 
* DO NOTHING. 
* 处 理 关键 指标 
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ASSIGN COMPONENT S KYFS OF STRUCTURE <хіһ data» TO «s kyfs». 


IF «s kyfs > IS ASSIGNED. 
* 销售 数量 
ASSIGN COMPONENT KOXSSL OF STRUCTURE <s_kyfs > ТО < kOxssl >. 
* 销售 价格 
ASSIGN COMPONENT KOXSJG OF STRUCTURE <s_kyfs > ТО < kOxsjg >. 
* 销售 金额 
ASSIGN COMPONENT KOXSJE OF STRUCTURE «s Ку > ТО <kOxsje >. 


IF < kOxssl > IS ASSIGNED AND < kOxsjg > IS ASSIGNED AND < kOxsje > IS AS- 
SIGNED. 
< КОхѕје > = <kOxssl > * «kOxsjg». 
ENDIF. 
ENDIF. 


ENDLOOP. 


ENDFUNCTION. 


执行 完毕 后 可 以 看 到 ， 在 信息 块 中 对 每 个 物料 和 每 个 月 份 都 新 增加 了 一 条 记录 ， 在 这 
记录 中 没有 数量 和 价格 ， 只 有 人 金额， 这 就 是 运行 Exit 退出 功能 之 后 新 增 4... н 
图 8-20 所 示 。 


ЕТ 编辑 (E) EIO ЖЕМ) RES) 系统 (Y) 帮助 (H) 
ç 48 CoO BAR S G 2 ае 


"SINORCO1", 清单 输出 


@| | [Rer] ve] |] | Ф| ГӘ n] | 8] [5] s | а 


aat. Геом. 二 物料 组 | 0CHNGID [记录 类 型 [0REQUID [日历 年 /月 EET [gps ET EE БЕРЕ EUN 
1001 1М-1 1M APO RDDDIA6K79JGA29FLSFUTSLWSE 201201 0.00 | 11.0! 1 
1001 1M APO, RDDDIA6K79JGA29FLSFUTSLWSE 1 2012 CNY ТОМ | 11.00 0.00 0 
1001 1M APO RDDDIA6K79JGA29FLSFUTSLWSE 201202 2 2012 | CNY | TON 0.00 | 11.00 1 
|1001 1М APO RDDDIA6K79JGA29FLSFUTSLWSE 2 2012 |CNY | TON | 11.00 0.00 0 
1001 1М APO RDDDIA6K79)GA29FLSFUTSLWSE 201203 3 2012 |CNY | TON 0.00 | 11.00 1 
| 1001 1M APO RDDDIA6K79JGA29FLSFUTSLWSE 3 2012 CNY | TON 11.00 0.00 0 
1001 1М APO RDDDIA6K79JGA29FLSFUTSLWSE 201204 4 2012 |CNY | TON 0.00 | 11.00 H 
1001 1M APO RDDDIA6K79JGA29FLSFUTSLWSE 4 2012 |CNY | TON | 11.00 0.00 0 
1001 1М APO RDDDIA6K79JGA29FLSFUTSLWSE 201205 5 2012 | CNY | TON 0.00 | 11.00 1 
1001 1M APO RDDDIA6K79JGA29FLSFUTSLWSE 5 2012 |CNY | TON | 11.00 0.00 0 
1001 1М APO RDDDIA6K79JGA29FLSFUTSLWSE 201206 6 2012 CNY | TON 0.00 | 11.00 1 
1001 1M APO RDDDIA6K79JGA29FLSFUTSLWSE 6 2012 CNY ТОМ 11.00 0.00 0 
1001 1М APO RDDDIA6K79JGA29FLSFUTSLWSE 201207 7 2012 |CNY | TON 0.00 | 11.00 1 
| 1001 1M APO RDDDIA6K79JGA29FLSFUTSLWSE 7 2012 CNY | TON 11.00 0.00 0 
1001 1М APO RDDDIA6K79JGA29FLSFUTSLWSE 201208 8 2012 СМҮ ТОМ 0.00 11.00 1 
| 1001 1M APO_RDDDIA6K79]GA29FL5FUTSLWSE 8 2012 СМҮ ТОМ 11.00 0.00 0 
1001 1М APO RDDDIA6K79JGA29FLSFUTSLWSE 201209 9 2012 СМҮ | TON 0.00 | 11.00 1 
1001 1M APO RDDDIA6K79JGA29FLSFUTSLWSE 9 2012 CNY | TON | 11.00 0.00 0 
|1001 1М APO RDDDIA6K79JGA29FLSFUTSLWSE 201210 10 2012 | CNY | TON 0.00 | 11.00 1 
1001 1M APO_RDDDIA6K79]GA29FL5FUTSLWSE 10 2012 |CNY ТОМ 11.00 0.00 0 
1001 1М APO RDDDIA6K79)GA29FLSFUTSLWSE 201211 11 2012 СМҮ ТОМ 0.00 11.00 1 
1001 1М APO. RDDDIA6K79JGA29FLSFUTSLWSE 11 2012 |CNY | TON 11.00 0.00 0 
|1001 1М APO RDDDIA6K79JGA29FLSFUTSLWSE 201212 12 2012 |CNY | TON 0.00 | 11.00 1 
1001 1M APO RDDDIA6K79JGA29FLSFUTSLWSE 12 2012 |CNY | TON | 11.00 0.00 0 


ІН 8-20 退出 功能 执行 后 新 增加 的 数据 
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8.4.2 BW -IP 中 的 退出 功能 


BW - IP 中 存在 两 个 接口 界面 ， 即 IF_RSPLFA_SRVTYPE_IMP_EXEC 和 IF. RSPLFA - 
SRVTYPE_IMP_EXEC_REF， 我 们 只 需 生 成 一 个 对 象 类 ， 并 包含 上 述 两 个 接口 界面 中 的 一 
个 ， 即 可 实现 退出 功能 。 其 中 ， 第 一 个 接口 界面 适用 于 不 需要 其 他 参照 数据 的 退出 功能 ， 第 
二 个 接口 界面 在 实现 退出 功能 时 需要 参考 其 他 数据 。 这 里 的 参考 数据 是 指 在 计划 功能 中 使 用 
到 ， 但 是 又 不 发 生 任何 改变 的 数据 。 通 常 来 说 ,在 BW - BPS 中 的 退出 功能 属于 不 带 参考 数 
据 的 计划 ， 这 也 是 为 什么 很 多 时 候 ， 数 据 都 被 锁定 ， 并 且 有 可 能 因为 程序 的 BUG 而 被 错误 
地 更 改 。 例 如 ， 我 们 希望 根据 实际 数据 来 对 计划 数据 进行 处 理 ， 但 同时 很 有 可 能 实际 数据 也 
被 错误 地 更 改 。 从 BW 7. 0 起 ,参考 数据 就 被 保护 起 来 不 允许 更 改 ， 因 为 很 多 时 候 都 需要 使 
用 参考 数据 。 在 下 面 的 介绍 过 程 中 也 使 用 了 参考 数据 ， 需 要 说 明 的 是 ， 不 带 参考 数据 的 退出 
功能 的 实施 和 带 参 考 数据 的 实施 过 程 是 一 样 的 。 

接口 界面 IF_RSPLFA_SRVTYPE_IMP_EXEC_REF 包含 以 下 几 个 方法 ， 具 体 如 图 8-21 
所 示 。 


ГЕ? 
| Interface Edit Goto  Utiities(M) Environment System Help 


606  »XJJg"eaBjieee Dus ааа оа 


L. 


Class Builder: Display Interface IF RSPLFA 


SRVTYPE IMP. EXEC, REF 


ЕГІН ІІ ЕН | [|| Interface documentation 
Interface IF RSPLFA SRVTYPE IMP EXEC REF Implemented / Active 
а Parameters | 只 Exceptions [ЕЕ] ES 8) 口 Fiker 


Me |Description 


INIT EXECUTION Instance Method Initialization for Execution 


GET REF DATÀ SEL Instance Method Determine Selection for Reference Data 
ADD NEW BLOCKS Instance Method Add New Blocks 
EXECUTE Instance Method Execution 


FINISH EXECUTION Instance Method Actions at End of Execution 


图 8-21 接口 界面 下 _RSPLFA_SRVTYPE IMP EXEC. REF 包含 的 方法 


(1) 方法 INIT_EXECUTION 
本 方法 用 来 进行 一 些 数据 处 理 之 前 的 初始 化 工作 ， 其 包含 的 参数 如 图 8-22 所 示 。 


Ee Edit Goto Utilties(M) Environment System Help 
(08-140 освепоссеевав пп оа 
Class Builder: Display Interface IF RSPLFA SRVTYPE IMP EXEC REF 
| Z| ea | | ШІ СЕЛІ | 8 | Interface documentation 


Interface IF RSPLFA SRVTYPE IMP EXEC REF | Implemented / Active 


Properties , Interfaces , Attributes Events , Types , Aliases | 
Method parameters шт Екі (4 


Typing Ме [Associated Type Default value Description 
I R SRVTYPE DEF Importing V | C Type Ref IF RSPLFA SRVTYPE Service Type (Definition) 
I R SRV Importing |^ | Type Ref IF RSPLFA SRV Planning Service 
I R INFOPROV DESC Importing V | C Type Ref IF RSPLFA INFOPRC InfoProvider (Metadata) 
I R MSG Importing V |” Type Ref IF RSPLFA MSG Messages 
I T DATÀ CHARSEL Importing M | |) Type RSPLF. T CHARSEL Current filter 


8-22 ТӘСІМІ EXECUTION 包含 的 参数 
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ЯҢ, S% I К SRVTYPE DEF 包含 了 服务 类 型 定义 的 相关 信息 ， 如 实施 对 象 类 和 是 否 
包含 参考 数据 等 ; 参数 I_R_SRV 包含 了 计划 功能 的 相关 信息 ， 如 信息 提供 者 或 计划 功能 
ЖІ; 参数 I_R_INFOPROV_DESC 包含 了 信息 提供 者 的 字典 信息 ， 如 使 用 到 的 特性 和 关键 指 
bk; 参数 I_R_MSG 用 来 返回 消息 ， 所 以 在 代码 编写 过 程 中 ， 需 要 调用 ADD_MSG 方法 对 该 
参数 进行 操作 ， 本 方法 会 自动 获取 系统 字段 SY - MSGNO 的 信息 ， 用 户 不 需要 传输 其 他 参 

Ж; SUI T DATA_CHARSEL tJ 24 Hi Bg vea T 

通常 情况 下 ,方法 INIT EXECUTION 保持 为 空 或 含有 一 些 一 般 性 的 选择 代码 。 

(2) 方法 GET. REF. DATA, SEL 

本 方法 用 来 从 信息 提供 者 中 读 取 作为 参考 的 数据 ， 由 于 参考 的 数据 不 会 被 更 改 ， 因 此 这 
些 数据 也 不 会 被 锁定 ， 其 包含 的 参数 如 图 8-23 所 示 。 


| pm Edit Goto Utilties(M) Environment System Help 
а | аш фаб аш ата ато 
Class Builder: Display Interface IF RSPLFA SRVTYPE IMP EXEC REF 
| НЕ elmi E] |Н) | || 1nterface documentation 


interface: |IF RSPLFA SRVTYPE IMP EXEC REF| Implemented / Active 
Properties у Interfaces , Attributes MITT EE Events , Types , Alases 
Method parameters ÍGET REF DATA SEL č ЕЗІМ 
l i b! i Default value Description 

I T DATA CHARSEL Importing M [ Type RSPLF T CHARSEL Current Selection 

I R PARAM SET Importing 网 |І Type Ref IF RSPLFA PARAM * Current Parameter Record 

I R MSG Importing |^ Г Type Ref IF RSPLFA  MSG Messages 

E TH NO REF BLOCK CHA Exporting O | O Type RSPLF_TH_IOBJ InfoObjects Without Block Building 
E T REF CHARSEL Exporting | | | O Type RSPLF. Т CHARSEL Reference Data Selection 

[1| О Type 


98-23 方法 GET КЕЕ DATA SEL 包含 的 参数 


Hop, SRI T DATA. CHARSEL fil I. R. MSG 与 方法 INIT, EXECUTION 中 的 同类 参数 
2 ЖІ БК PARAM, SET 包含 计划 功能 中 的 指定 参数 ; Z E T REF. CHARSEL 必须 

含 参照 数据 的 所 有 有 效 组 合 ， 通 常会 将 参数 T БАТА CHARSEL 中 的 选择 包括 进来 ， 以 
4. ЭЖ Е ТН NO REF BLOCK CHA 包含 了 那些 将 会 被 排除 在 参照 数据 选择 
条 件 之 外 的 特性 。 

示例 : if_rsplfa_srvtype_imp_exec_ref ~ get_ref_data_sel， 代 码 如 下 。 


METHOD ift_rsplfa_srvtype_imp_exec_ref ~ get. ref data, sel. 
DATA:s charsel TYPE rsplf s charsel, 
s iobjnm TYPE rsplf s iobjnm. 
* 输出 所 有 选择 数据 作为 参考 
* KET OVERSION 信息 对 象 
LOOP AT i t data_charsel INTO s. charsel. 
IF s charsel – iobjnm <> OVERSION . 
APPEND s charsel TO e t ref charsel. 
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ENDIF. 

ENDLOOP. 
* 添加 实际 版 本 

s_charsel — iobjnm = OVERSION . 

s charsel - sign = 1. 

s charsel - opt = EQ . 

s. charsel – low = IST . 

INSERT s charsel INTO TABLE e. t. ref charsel. 
* 将 OCOSTCENTER 从 锁定 中 独立 出 来 

s_iobjnm = 0COSTCENTER . 

INSERT s iobjnm INTO TABLE е th. no ref block cha. 
ENDMETHOD. 


(3) 方法 ADD. NEW. BLOCKS 

本 方法 的 功能 和 BW - BPS 中 的 INIT 函数 功能 类 似 ， 用 来 产生 不 出 现在 数据 处 理 中 的 特 
性 组 合 ， 如 参考 数据 的 数据 特性 组 合 。 这 样 的 功能 在 标准 的 SAP 开发 中 会 被 经 常用 到 ， 如 
BW -IP 中 上 默认 的 复制 功能 实施 的 代码 对 象 类 CL_RSPLFC_COPY 就 有 类 似 的 代码 段 。 方 法 
ADD_NEW_BLOCKS 包含 的 参数 如 图 8-24 所 示 。 


— Interface Edit Goto Utilties(M) Environment System Help 


ç "ап eeoeBsumsx sensus rl Ot 
Class Builder: Display Interface IF RSPLFA SRVTYPE IMP EXEC REF 


[ME] ffe] p] | ®][1 Е ДЕ NE [E |Ң [ mterface documentation | 


Interface |IF RSPLFA SRVTYPE IMP EXEC REF| Implemented / Active 
Method parameters (ADD МЕ BLOCKS ЕЗІМ 


4: Methods |Ë Exceptions 


; Op... | Typing Ме. [Associated Type Default value Description 


Importing |^ [ Type Ref IF RSPLFA  PARAM 2 Record of Parameter Values 
Importing 网 | |? Туре HASHED TABLE Reference Data 
ISTING BLOCKS Importing 网 | O Type SORTED TABLE Existing Data Blocks 
і Importing 网 [ 1 Type Ref IF. RSPLFA MSG Messages 
E TS NEW BLOCKS Exporting Г1 |! Type SORTED TABLE New Data Blocks 


8-24 方法 ADD NEW. BLOCKS 包含 的 参数 


НФ, 291 К PARAM SET FI I. БК. MSG 与 前 面 描述 的 一 样 ， 2901 TH REF DATA 
包含 了 方法 СЕТ REF DATA. SEL 中 确定 的 参考 数据 ; Z% I TS EXISTING. BLOCKS 包含 了 
已 经 存在 于 计划 数据 中 的 有 效 组 合 ， 和 BW - BPS 中 一 样 ， 本 处 也 不 支持 删除 操作 ; 参数 
E TS NEW. BLOCKS 必须 用 其 他 的 特性 组 合 数据 进行 填充 。 

示例 : if_rsplfa_srvtype_imp_exec_ref ~ add_new_blocks， 代 码 如 下 。 


METHOD if_rsplfa_srvtype_imp_exec_ref ~ add. new, blocks. 
DATA:l г new. block TYPE REF TO data. 
FIELD - SYMBOLS: «s ref data» TYPE ANY, 
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«s new block > ТҮРЕ ANY. 
* 产生 一 条 新 记录 
CREATE DATA 1 г new. block LIKE LINE OF e ts new. blocks. 
ASSIGN 1 r new block -> * TO «s new. block >. 
ж 检查 参考 数据 
LOOP AT i th, ref data ASSIGNING «s ref data >. 
* 检查 是 否 已 经 存在 计划 数据 
MOVE - CORRESPONDING «s ref data» TO «s new. block >. 
READ TABLE i ts, existing blocks TRANSPORTING no fileds FROM «s, new. block >. 
IF sy - subre «»0. 
* 若 不 存在 , 则 插入 新 的 组 合 数据 
COLLECT «s new. block > INTO e ts. new. blocks. 
ENDIF. 
ENDLOOP. 
ENDMETHOD. 


(4) Jrik EXECUTE 

本 方法 是 整个 接口 界面 的 核心 部 分 ， 因 此 该 段 代 码 必 须 填 充 ， 不 像 方法 INIT. EXECUTION 
那样 可 以 不 包含 任何 代码 。 同 BW - BPS 中 一 样 ， 本 方法 中 也 包含 一 个 C_TH_DATA 表格 ， 
该 表格 包含 了 所 有 即将 进行 处 理 的 计划 数据 。 方 法 EXECUTE 包含 的 参数 如 图 8-25 
所 示 。 


Ге 
| Interface Edit Goto  Utiities(M) Environment System Help 


"| agieeoee us ата spot 


Class Builder: Display Interface IF RSPLFA SRVTYPE IMP EXEC REF 


Heee] £8] v ПЕ | ru ЕГ || | j| mterface documentation | 


Interface |IF RSPLFÀ SRVTYPE IMP EXEC REF | Implemented / Active 

Method parameters [EXECUTE | | EN А ЕЗІМ 
{Typing Ме [Associated Type Default value Description 

[LR PARAM SET: Importing V| | [| Type Ref IF RSPLFA РАВАМ 2 Parameter Record (Values) 

I TH REF DATÀ Importing |^ Type HASHED TABLE Reference Data 

I S BLOCK LINE Importing |^ Type ANY Current Data Block 

I В МС Importing 网 | | Type Ref IF. RSPLFA NSG Messages 

C TH БАТА Changing Type HASHED TABLE Transaction Data 


图 8-25 方法 EXECUTE 包含 的 参数 


Н, 2901 К РАКАМ_ЅЕТ, І ТН_КЕЕ РАТА #ll I R. MSG 与 之 前 其 他 方法 的 同类 参 
数 一 样 ， 仅 有 L S BLOCK LINE 是 本 方法 独 有 的 参数 。 参 数 I_S_BLOCK_LINE 包含 了 那些 
在 当前 数据 选择 中 为 常数 的 特性 ， 如 公司 代码 、 货 币 和 单位 等 。 

下 述 示 例 代 码 的 处 理 逻 辑 是 将 参考 数据 中 对 应 成 本 中 心 的 数据 全 部 复制 到 计划 数据 中 ， 
如 果 没 有 参考 数据 ， 则 所 有 成 本 中 心 的 所 有 数据 都 会 被 复制 。 
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METHOD if rsplfa srvtype imp. exec ref ~ execute. 


FIELD -SYMBOLS: «f ccetr > TYPE /bi0/oicostcenter , 
«f cctr ref > TYPE /biO/oicostcenter , 
«f amount > TYPE /bi0/oiamount, 


« f ref. data > TYPE ANY, 
« f new. data > TYPE ANY. 
DATA :1 г data TYPE REF TO data, 
1 d amount TYPE /bi0/oiamount , 
1 d count TYPE 1. 
* 产生 一 条 空 记录 
CREATE DATA Іт data LIKE LINE OF c th. data. 
ASSIGN 1 т data -> * TO «f new data >. 
* 为 OCOSTCENTER 赋值 
ASSIGN COMPONENT OCOSTCENTER OF STRUCTURE i s block line TO «f cctr >. 
IF sy - subre <> 0. 
ж 如 果 结 构 中 不 存在 , 则 可 以 报错 ,本 处 不 做 处 理 
ENDIF. 
* 读 取 成 本 中 心 参考 数据 
CLEAR 1. d. count. 
LOOP AT i th ref data ASSIGNING «f ref data». 
ASSIGN COMPONENT OCOSTCENTER OF STRUCTURE «f ref data» TO «f ссі ref >. 


IF «f cctr» = «f cctr ref >. 
ADD 1 TO 1 d count. 
«f new. data > = «f ref data». 
REFRESH c. th, data. 
INSERT «f new. data > INTO TABLE c. th. data. 
ENDIF. 
ENDLOOP. 


IF 1 4 count = 0. 
ж 未 找到 成 本 中 心 对 应 的 数据 

CLEAR 1_d_count. 

LOOP AT 1 th ref data ASSIGNING «f ref data >. 
ASSIGN COMPONENT OAMOUNT OF STRUCTURE «f ref data» TO «f amount >. 
IF sy - subre <> 0. 

" wrong configuration trigger error 

ENDIF. 
«f new. data > = «f ref data». 
ADD 1 TO 1 d count. 
ADD «f amount > TO l, d amount. 
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ENDLOOP. 
ASSIGN COMPONENT OAMOUNT OF STRUCTURE «f new. data > TO «f amount >. 


IF 1 d. count « » 0. 
«f amount > -і d, amount / l d count. 
ELSE. 
«f amount > = 0. 
ENDIF. 
REFRESH c. th. data. 
INSERT «f new. data > INTO TABLE c. th. data. 
ENDIF. 
ENDMETHOD. 


(5) 方法 FINISH. EXECUTION 

本 方法 主要 在 方法 EXECUTE 处 理 完毕 后 ， 用 来 对 大 的 内 表 或 其 他 对 象 执 行 清理 工作 。 
本 方法 只 有 一 个 参数 I_R_MSG， 用 来 返回 系统 信息 ， 如 图 8-26 所 示 。 通 常 来 讲 ， 该 方法 不 
包含 任何 代码 。 

| Em Edit Goto Utilities(M) Environment System Help 

s|agieee BAR ааыа 
Class Builder: Display Interface IF RSPLFA SRVTYPE IMP EXEC ВЕЕ 
HEN | e ЕЛ ЕЕ ТН | [ir] mtertace documentation | 


Interface [IF RSPLFA SRVTYPE IMP EXEC REF | Implemented / Active 


Importing Ї | | Type Ref IF. RSPLFA NSG Messages 


到 8-26 ”方法 FINISH. EXECUTION 包含 的 参数 


总 的 说 来 ,在 BW -IP 中 执行 的 带 参考 数据 的 功能 要 比 BW - BPS 中 的 退出 功能 灵活 ， 
因为 在 BW -JP 中， 参考 数据 功能 不 会 导致 像 BW -BPS 中 那样 的 数据 锁定 。 但 是 ， 有 关 
BW -IP 的 功能 增强 ， 对 开发 人 员 来 说 需要 更 高 的 要 求 ， 因 为 要 大 量 地 使 用 面向 对 象 的 
АВАР OO 语言 。 如 果 对 АВАР OO 话 言 实在 不 熟悉 ， 则 还 有 另外 一 种 方式 ， 即 使 用 CL_ 
RSPLFC_BPS_EXITS， 在 该 对 象 类 中 我 们 可 以 使 用 类 似 BW - BPS 中 的 功能 退出 。 

在 实际 的 项 目 实施 过 程 中 ， 我 们 往往 需要 实施 从 财务 预算 发 起 的 业务 计划 ， 并 且 由 业务 
计划 输入 的 数据 推算 相关 财务 指标 ， 最 终 回 到 财务 预算 ， 以 实现 全 过 程 的 预算 管理 。 在 此 过 
程 中 ， 相 互 之 间 的 数据 传递 以 及 计算 逻辑 都 需要 使 用 Exit 功能 进行 编写 ， 因 此 熟练 掌握 相 
关 的 АВАР 进行 预算 功能 的 增强 ， 在 项 目 中 显得 尤为 必要 。 
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91% 系统 运行 中 的 功能 增强 


9.1 通过 ABAP 程序 启动 处 理 链 


9.1.1 应 用 场景 描述 


在 BW 后 期 的 运行 维护 中 ， 很 多 时 候 都 需要 手工 对 处 理 链 进行 执行 ， 如 月 结 完毕 后 
需要 立即 在 BW 系统 中 出 具 资 产 负债 表 、 损 益 表 、 应 收 账 款 分 析 表 和 应 付 账 款 分 析 表 
等 。 但 是 ， 这 样 的 专业 工作 对 于 很 多 业务 人 员 来 说 难以 掌握 ， 因 此 需要 将 原先 专业 的 
处 理 链 顺序 执行 等 操作 转变 为 业务 人 员 熟 悉 的 事务 码 操作 ， 这 样 可 以 大 大 提高 系统 的 
可 维护 性 。 


9.1.2 详细 实施 步 又 


首先 需要 定义 被 执行 的 处 理 链 ， 下 面 的 处 理 链 以 TESTTEST 为 例 进行 演示 和 分 析 ， 定 义 
的 处 理 链 如 图 9-1 所 示 。 


1.1.10 2ТЕ5Т 
1.1qsq 处 理 链 РЅА->050 ТОҚ РС01 
1.2qsq 处 理 链 D50->CUBE GR2TEST 


CƏ Қ ДАВАР ЯН 
b даят жш 
P ah 未 分 本 的 


图 9-1 处 理 链 TESTTEST 的 定义 


处 理 链 的 开始 条 件 必须 设置 为 “开始 使 用 元 链接 或 API”， 如 图 9-2 所 示 。 
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жең TESTTEST. 2) 立即 开始 
最 后 更 改 人 PAHXIE 更 改 时 间 2012.02.27 在 15:24:25 


直接 计划 


图 9-2 处理 链 开始 条 件 设 置 


然后 即 可 在 BW 系统 中 ， 通 过 编写 程序 调用 系统 标准 的 API 对 处 理 链 进行 执行 ， 程 序 代 
码 如 下 。 


ж $ ж 
* & Report 7РС АВАР START 
*& * 


REPORT рс abap. start. 
РАТА ;1 logid ТҮРЕ rspc. logid. 
CALL FUNCTION RSPC АРІ CHAIN. START 
EXPORTING 
i chain = TESTTEST 
IMPORTING 
e logid 21 logid 
EXCEPTIONS 
failed =1 
OTHERS =2. 
IF sy — subre <>0. 
ж MESSAGE ID SY – MSGID TYPE SY - MSGTY NUMBER SY - MSGNO 
* WITH SY – MSGV1 SY - MSGV2 SY - MSGV3 SY - MSGVA. 
ELSE. 
WRITE :1. logid. 
ENDIF. 


9.1.3 单元 小 结 


处 理 链 和 АВАР 程序 的 交互 在 很 多 时 候 显得 很 有 必要 ， 因 此 我 们 不 仅 要 知道 如 何在 处 理 
链 中 增加 ABAP 程序 的 执行 节点 ， 而 且 也 要 知道 如 何在 ABAP 程序 中 调用 处 理 链 。 


9.2 当天 数据 上 载 结果 监控 


9.2.1 应 用 场景 描 


在 BW 系统 中 ， 检 查 当 日 数据 上 载 最 方便 的 功能 就 是 使 用 类 似 ST13 中 的 BW - TOOLS 
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或 RSPC1 
得 相对 复 困 
“ 管理 ” 


个 ， 甚 至 上 百 个 信息 块 ， 因 此 这 项 工作 十 分 人 繁重， 其实 我 们 可 以 通过 


显 Ж Н 志 的 方式 进行 


选项 ， 查 看 当天 的 数据 上 载 请 3 


据 目标 进 和 J 集中 监控 。 


9.2.2 


下 述 示例 代码 最 终 的 结果 通过 АГУ 展示 出 来 ,我 们 可 以 使 用 ALV 自 带 的 各 种 功能 ， 如 


筛选 过 滤 和 排序 等 得 过 ABAP 监控 所 有 数据 目标 的 代码 如 下 。 


详细 实施 步 又 


， 但 是 这 样 的 操作 对 于 不 太 熟 悉 BW 系统 的 人 来 说 ， 
杂 。 另 外 一 个 方法 就 是 在 所 有 的 数据 目标 ， 如 信息 块 中 ， Mee. 选择 
中 存在 几 十 
ABAP 代码 的 方式 对 数 


是 否 为 绿色 。 但 是 ， 由 于 一 个 BW 5 


到 最 终 想 要 的 结果 。 通 


还 是 显 


#9 


*& 


* & Report YDATA LOAD MONITOR 


*& 


REPORT ydata load, monitor. 

TYPE - POOLS :slis. 

DATA : у icube TYPE rsinfocube, 
w. msidlast TYPE rssid , 


w. timestamp TYPE rstimestmp, 


zdatel (14) , 
zdate( 8). 

DATA: BEGIN ОЕ нар OCCURS 0, 
м dta TYPE rsstatmandta , 


w. dta, type TYPE rsstatmandta type, 


м. linesread TYPE sy – tabix, 


w. linestransferred TYPE sy -tabix， 


w. isource TYPE rsisource, 


м. source, dta TYPE rsstatmandta, 


END OF itab. 


РАТА :s fieldcat TYPE slis fieldcat. alv, 
t fieldeat TYPE slis 1 fieldcat, alv. 


* 选择 屏幕 开始 


SELECTION - SCREEN BEGIN OF BLOCK bl WITH FRAME TITLE text — 001. 
PARAMETERS: p. date TYPE sy – datum DEFAULT sy — datum. 
SELECTION - SCREEN END OF BLOCK bl. 


* 选择 屏幕 结束 


START - OF -SELECTION. 


SELECT icube rnsidlast timestamp 


FROM rsiccont 


INTO( у. icube, w. rnsidlast , w. timestamp). 


zdatel - м timestamp. 
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zdate — zdatel. 

ж 如 果 对 应 的 条 目 是 选择 日 期 当天 的 记录 , 则 继续 去 rsstatmanpart. 中 查找 相关 数据 并 加 入 到 
itab 中 

IF zdate EQ p_date. 


SELECT SINGLE dta dta type anz recs insert, recs isource source, dta 


FROM rsstatmanpart 
INTO itab 
WHERE partnr = w. rnsidlast. 
APPEND itab. 
ENDIF. 


ENDSELECT. 

x 构建 输出 结构 表 

PERFORM fieldcatlog USING 数据 目标 ITAB W_DTA . 

PERFORM fieldcatlog USING 目标 类 型 ITAB W_DTA_TYPE . 

PERFORM fieldcatlog USING. 读 取 数据 条 四 ITAB W_LINESREAD . 
PERFORM fieldcatlog USING. 传输 数据 条 四 ITAB № LINESTRANSFERRED . 
PERFORM fieldcatlog USING. 来 源 ITAB W. SOURCE, DTA . 

PERFORM fieldcatlog USING. 数据 来 源 类 型 ITAB W. ISOURCE . 

* 对 输出 表 进 行 整理 
SORT itab BY w_dta w_dta_type w_linesread w_linestransferred w_source_dta w_isource . 
DELETE ADJACENT DUPLICATES FROM itab COMPARING ALL FIELDS. 

«ЙІН ALV 进行 输出 
CALL FUNCTION REUSE АГУ  GRID DISPLAY 


EXPORTING 
i callback program = sy – repid 
it. fieldcat = t, fieldcat 
TABLES 
t. outtab = itab. 
*& * 
*& Form FIELDCATLOG 
*& * 
FORM fieldcatlog | USING value ( p 0107) 
p. 0108 
p. 0109. 


CLEAR в fieldcat. 
s. fieldcat — seltext 1 = p 0107. 
s. fieldcat — fieldname = p. 0109. 
s. fieldcat — tabname = p. 0108. 
APPEND s fieldcat TO t. fieldcat. 
ENDFORM. " FIELDCATLOG 


375 


运行 界面 的 输入 条 件 如 图 9-3 所 示 ， 程 序 运 行 结果 如 图 9-4 所 示 。 


|2 аж 编辑 (E) 转 到 (G) 系统 (Y) 帮助 (H) 


c зав eoe BAR КЕ кака @ m 
数据 上 载 数据 目标 监控 程序 
© 
| 日 期 选择 I ЖЫ 
监控 日 其 2012. 07. 24 


9-3 运行 界面 的 输入 条 件 


Ге 
| HRU) 编辑 (E) Ж%(6) WAM 设置 (5) 系统 (Y) 帮助 (H) 
ве | saBjleae Bas 0 m=i e 


数据 上 载 数据 目标 监控 程序 
а а а я(ата Ен Н 


MES 数据 来 源 类 . 


SINOVKF | CUBE 40 40 |SINODSO2 ОТАЅЕС 
үл CUBE 40 40 |SINODSO2 | DTASRC 
V2 CUBE 40 40 |SINODSO2 | DTASRC 


@ 9-4 程序 运行 结果 


9.2.3 单元 小 结 


在 后 续 的 运 维 过 程 中 会 遇 到 形形色色 的 需求 ， 不 仅 是 对 处 理 链 是 否 成 功 以 及 上 载 了 多 少 
数据 的 监控 ， 同 时 也 会 对 开始 时 间 、 结 束 时 间 和 运行 时 间 等 进行 监控 ， 这 就 需要 我 们 对 系统 
后 台 日 志 表 等 进行 详细 的 了 解 ， 因 此 建议 读者 参考 SAP 官方 文档 ， 同 时 本 书 第 10 章 也 对 相 
关 常 用 表格 进行 了 罗列 ， 以 供 读者 参考 。 


93 在 处 理 链 中 安排 数据 选择 性 删除 


9.3.1 应 用 场景 描述 


在 BW 系统 的 后 期 运行 中 ， 可 以 利用 处 理 链 进 行 自动 的 数据 上 载 和 处 理 。 实 际 上 有 些 时 
候 ， 我 们 会 选择 删除 全 部 数据 ， 然 后 重新 上 载 数 据 ， 因 此 在 处 理 链 的 节点 类 型 中 有 一 种 类 型 
叫 作 “数据 目标 内 容 完全 删除 ” 。 但 是 有 些 时 候 ， 我 们 不 希望 删除 全 部 的 数据 ， 特 别 是 当 数 
据 量 特别 大 时 ， 如 某 部 分 的 数据 需要 重新 上 载 ， 那 么 我 们 可 以 在 系统 中 进行 数据 的 选择 性 
删除 。 


9.3.2 详细 实施 步 又 


为 了 达到 选择 性 删除 的 目的 ， 通 常 的 实施 步骤 如 下 。 

第 1 步 : 使 用 程序 RSDRD, DELETE, FACTS 生成 带 选择 界面 的 选择 性 删除 程序 ， 如 
图 9-5 所 示 。 
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vi 


从 数据 目标 中 删除 所 选 条 目的 程序 


ІІ (ШЕ 


e 
数据 目标 Енсі EË 
四 使 用 技术 性 名 称 吗 ? 


O 
e 
О 


GPDDBNETOJYBXG2T6SRKOP( 


49-5 通过 程序 生成 选择 性 删除 程序 


第 2 步 : 运行 生成 的 程序 GPDDBNFTOJVBXG2T68RKOPC7IGU ， 在 选择 条 件 界 面 可 以 指 
定 选择 条 件 ， 如 图 9-6 所 示 。 


^ mE айю naa ов ——. 
从 数据 目标 中 删除 选 定 的 条 目 stNoco 


图 9-6 选择 性 删除 条 件 输入 界面 


为 了 能 反复 地 使 用 该 程序 的 条 件 对 信息 块 进行 删除 ， 可 以 将 这 些 选择 条 件 保 存 为 程序 运 
行 变 式 ， 如 图 9-7 所 示 。 
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E 
| 变 式 (A) 编辑 (E) 转 到 (6) 环境 (N) 系统 (Y) 帮助 (H) 


[v] т 4 @ Caa CHER $us B Ig 


变 式 属 性 
2 ERRON 


变 式 名 称 [Delet1000 | 
含义 | 是 除 1000 公 司 的 数据 | 屏幕 分 本 
Bl eese | 选择 屏幕 ] 
口 公 用 于 后 台 处 理 | | 1000 
口 保护 变 式 
口 仅 在 目录 中 显示 
回 系 统 变 式 〈 自 动 传输 ) 
EET TIE 
选择 屏幕 ”的 对 象 
DEES [еей ж. .| 保护 字段 | 隐藏 字段 | 隐藏 字段 BI | 保存 无 值 的 字 .. | GPA > | 要求 的 字段 | 选择 变 里 | 选 .| 变量 名 称 ( 仅 使 用 54 输 | 
1,000 С001 r^ г 
1,000 С002 
1,000 С003 
1,000 С004 
1,000 С005 
1,000 С006 
1,000 C007 
1,000 С008 
1,000 С009 
1,000 С010 
1,000 С011 
1,000 |L PA 
1,000 |L NL 
1,000 |L SR 
1,000 |L WP 


D| o V| о N| ni щл mn щл! n n щл! щл л 


(9-7 保存 选择 条 件 为 程序 运行 变 式 


有 了 运行 选择 性 删除 的 程序 以 及 针对 该 程序 的 变 式 后 ， 即 可 在 处 理 链 中 使 用 增加 
“ABAP 代码 节点 ”的 方式 来 对 数据 进行 选择 性 删除 。 
上 述 方法 对 于 选择 条 件 来 说 需要 保持 固定 (因为 变 式 保存 后 会 一 直 保 存 选择 参数 的 
值 ) ， 但 是 我 们 可 能 希望 有 更 加 灵活 的 数据 删除 条 件 ， 如 自动 删除 24 个 月 以 前 的 数据 ， 那 
么 就 需要 使 用 АВАР 代码 来 设 定 选择 条 件 ， 调 用 系统 标准 函数 RSDRD. SEL. DELETION 进行 
数据 目标 的 选择 性 删除 ， 相 关 代 码 如 下 。 


*& * 
* & Report Y SELCTION. DELETE. SINOCOI 
*& ж 


REPORT у веіспоп delete, віпос01. 

TYPE – POOLS :rsdrd, rsdq, rssg. 

DATA:1 uid TYPE rssg, uni. idc25, 
] yearl TYPE /Һ0/оіса!уеаг, 
1 уеаг2 TYPE /Һ0/оіса!уеаг, 
] t. msg TYPE rs, t msg, 
] thx. sel ТҮРЕ rsdrd. sx, sel, 
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]t thx sel TYPE rsdrd, thx, sel. 
DATA lt tab TYPE rsdrd t. range. 
DATA wa tab TYPE rsdrd s range. 
* 公司 代码 条 件 GOGSDM у 1000 
CLEAR lt tab. 
wa tab – sign = 1. 
wa, tab — option = EQ . 
wa, tab — low = 1000 . 
wa tab – keyfl X. 
APPEND уға tab TO lt. tab. 
1 thx sel – iobjnm = GOGSDM . 
] thx sel – t range[ | = lt_tab[ ]. 
INSERT 1, thx sel INTO TABLE lt, thx, sel. 
会 计 年 度 条 件 OCALYEAR 为 10 年 前 
CLEAR lt_tab. 
l_yearl = 1990. 
1 yeai2 = sy - datum(4) -2. 
wa tab —sign = 1. 
wa, tab — option = ВТ. 
wa, tab — low 21. yearl. 
wa tab — high 21 year2. 
wa tab – keyfl X. 
APPEND уға tab TO lt. tab. 
] thx sel – iobjnm = OCALYEAR . 
] thx sel – t range[ | =lt_tab[ ]. 
INSERT 1, thx sel INTO TABLE lt, thx, sel. 


CALL FUNCTION RSDRD SEL DELETION 
EXPORTING 


i datatarget = SINOCOI 

i thx, sel = ]t thx sel 

i authority check LX 

i threshold = 1. 0000E -01 
i mode = C 


i no logging E 
i parallel degree =1 
1 no. commit = 
i work on, partitions = 


i rebuild. bia " 


i write application log = X 
CHANGING 
c t msg -] t msg. 
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EXPORT 1. t msg ТО MEMORY ID sy - repid. 


最 后 要 在 处 理 链 中 将 该 程序 制作 成 一 个 节点 ， 然 后 在 向 信息 块 加 载 数据 之 前 加 入 该 节 
点 ， 以 达到 选择 性 删除 的 目的 。 
9.3.3 单元 小 结 

通常 来 说 ， 制 作 选 择 性 删除 不 建议 安排 后 台 系 统 自动 运行 ， 建 议 采 用 前 台 手 工 的 方式 ， 
如 果 数 据 量 过 大 ， 还 可 以 采取 分 开 多 个 存储 对 象 的 方式 ， 或 采用 近 线 存储 (Near Line Stor- 
age， 人 简称 NLS) ， 甚 至 是 归档 的 方式 达到 既定 目的 。 
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я 10 涉及 BW 系统 的 程序 和 数据 表 汇 总 


10.1 BW 系统 涉及 的 数据 表 汇 总 


10.1.1 ERP 中 涉及 BW 系统 的 数据 表 汇 总 
ЕВР 中 涉及 BW 系统 的 数据 表 汇 总 见 表 10-1, 


表 10-1 ERP 中 涉及 BW 系统 的 数据 表 汇 总 


事 务 码 程 序 名 文本 描述 
BF11 SM30 BTE 应 用 程序 区 域 确定 
LBWE RMCEXCUC 后 勤 提取 结构 定制 控制 台 
LBWG RMCSBWSETUPDELETE Па ЗЕ: 

LBWQ RSTRFCMI 后 勤 队 列 概览 

MCB_ SM30 确定 行业 

RSA2 RSAIREP 数据 源 查看 

RSA3 SAPLRSFH 数据 源 数据 提取 测试 器 
RSA5 RSA1 BCIN 安装 业务 内 容 

RSA6 RSAIDSMA 维护 数据 源 

RSA7 RSAIQMNT BW 增 量 队列 监控 器 
RSA8 RSAIHIMA 数据 源 库 

RSA9 RSAI APAC 传输 应 用 程序 组 件 层 次 结构 
RSO2 RSIO0009 维护 一 般 数 据 源 

SBIW SBIWSHOW 业务 信息 仓库 T- Code 树 
SM13 RSM13000 事务 更 新 队列 


10.1.2 BW 系统 中 的 常用 事务 码 
fr BW 系统 中 常用 的 事物 码 具 体 见 表 10-2 


表 10-2 BW 系统 中 的 常用 事物 码 汇总 


事 5 码 程 序 名 文本 描述 
RSAI RSAWBN. START 建 模 - 数据 仓储 工作 台 
RSA2 RSA1RSA2 SAPI 数据 源 资源 库 
RSA3 SAPLRSFH 提取 器 检查 程序 


381 


¥ 8 码 程 序 名 文本 描述 
В5А5 RSA1 BCIN 安装 业务 目录 
RSA6 RSAIDSMA 维护 数据 源 
RSA7 RSAIQMNT BW Delta 队列 监控 器 
RSA8 RSA1 HIMA 数据 源 仓库 
RRMX RRMX_START_EXCEL 启动 业务 浏览 器 分 析 程序 
РЕСС ЗАРІРЕСА TREE 色 维 护 
RSSM SAPLRSSBS 报告 的 权限 
RSRT SAPMRRII 报表 监视 器 启动 
RSMO RSMO1_RSM2 数据 加 载 监视 器 启 动 
RSMON RSAWBN_START 管理 -数据 仓储 工作 台 
RSDMWB 数据 挖掘 工作 台 
RSANWB 分 析 处 理 设计 器 
RSDMPROM SAPMRSDO 初始 屏幕 (多 个 提供 商 处 理 ) 
RSISET SAPLRSQ_ISET_MAINT 维护 信息 集 
RSDCUBE SAPMRSDO 启动 (信息 块 编辑 ) 
RSDODS SAPMRSDO 初始 屏幕 (ODS 对 象 处 理 ) 
RSHI RSSH. HIERM. START NEU 编辑 层次 初始 屏幕 
RSPLAN SAPLRSPLS_LAUNCH 对 BI 集 合 的 计划 进行 建 模 
RSRV RSRV_START 分 析 和 修复 BW 对 象 
FILE 跨 集团 文件 名 /路 径 
АШІ RSWATCHO 显示 SAP 目录 
WE05 RSEIDOC2 IDoc 列表 
SM51 RSM51000, ALV SAP 系统 的 清单 
SM59 SAPMCRFC RFC 目的 (显示 /维护 ) 
SM37 SAPLBTCH 作业 选择 概览 
SE37 RSFUNCTIONBUILDER ABAP/4 函数 模块 
SE11 DD_START АВАР ^J 
5Е16 SAPLSETB 数据 浏览 器 
5М01 SAPMTSTC 锁定 事务 
WE05 RSEIDOC2 IDoc 列表 
RSPC RSPC_MAINTAIN 处 理 链 维护 
RSPCM RSPC_MONITOR Ийт Н АРИНЕ 
SE38 RSABAPPROGRAM АВАР 编辑 器 
5Е80 SAPMSEUO 对 象 浏览 器 
RSPC RSPC_MAINTAIN 处 理 链 维护 
5053 ЗАРМ501С 显示 检查 值 
RS12 RSENQRR2 主 数据 锁定 概览 
5М12 RSENQRR2 显示 并 删除 锁 
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事 8 码 Ж F 名 文本 描述 
RSECADMIN SAPLRSEC, SCREENS 管理 分 析 权 限 
SCOT RSCONN07 SAPconnect - 管理 
SOST RSSOSOSTSTAT SAP 连接 发 送 请 求 
RSKC RSKC_ALLOWED_CHAR_MAINTAIN 维护 许可 的 附加 字符 
RSO2 RSIO0009 Oltp 元 数据 资源 库 
RSODADMIN 管理 元 数据 搜索 
RSCUSTV1 RSCALLCUSTOM 定义 二 维 文件 设置 
RSORBCT SAPLRSO1 BW 业务 内 容 传输 
SUIM RSUSRSUIM 用 户 信息 系统 
SM02 SAPMSEMI 系统 消息 
SMICM RSMONICM, STANDARD ICM Monitor 
LISTCUBE RSDD SHOW. ICUBE Ге АЕТ А ралы 
ВР50 UPC FW. CALL 业务 计划 
0507 RSHOSTO6 远程 操作 系统 活动 性 


10.2 BW 系统 中 其 他 相关 的 BAdl 和 User Exit 


本 书 主要 讨论 了 数据 源 增 强 的 BADI 和 User Exi、 虚 拟 信 息 块 的 BADI 和 User Exit 以 及 
报表 中 变量 的 User Exit, 但 是 BW 系统 中 还 有 其 他 的 BADI 和 User Exit， 本 节 将 对 这 些 未 能 
提 及 的 对 象 进行 说 明 。 


10.2.1 BAdls 


1) RSDBC SQL STATEMENT; 该 BADI 能 够 对 DB Connect 的 SQL 语句 进行 个 性 化 。 

2) RSR_OLAP_AUTH_GEN: 该 BADI 能 够 对 用 户 的 权限 进行 除 已 授权 之 外 的 个 性 化 。 

3) OPENHUB_TRANSFORM: 该 BADI 能 够 对 OPENHUB 的 输出 进行 个 性 化 转换 或 增 减 
输出 内 容 。 

4) RSRA ALERT; 该 BADI 能 够 在 报表 预警 (Reporting Agent). 中 对 预警 进行 处 理 。 

5) RSAR_CONNECTOR: 该 BADI 能 够 客户 化 地 定义 公式 编辑 髓 中 的 功能 函数 。 

6) BW_SCHEDULER: 该 BADI 用 来 控制 信息 包 之 后 的 任务 。 

7) RSOD_DOC_BADI: 该 BADI 用 来 对 报表 中 的 相关 文档 进行 处 理 。 

8) RSOD ITEM, DOC: 该 BADI 用 来 对 Web Item 进行 处 理 ， 它 能 完全 修改 系统 自动 生 
成 的 HTML 文件 。 

9) RSOD ITEM, DOC LIST; 该 BADI 包含 了 几 个 功能 ， 用 来 客户 化 相关 的 按钮 、 文 档 
列表 以 及 整个 HTML 文件 内 容 。 
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10) RSOD WWW. DOC. MAINT; 该 BADI 用 来 维护 SAP Bex Web 接口 中 的 文本 文档 。 
10.2.2 User Exit 


在 SEM - BPS 中 ， 存 在 两 个 用 户 出 口 ， 即 SEMBPSOI 和 SEMBPSO2, ， 用 于 对 特征 的 合并 
检查 和 衍生 进行 用 户 增 强 。 在 后 续 的 BW -BPS 中 ， 以 上 两 个 用 户 出 口 的 功能 已 经 迁移 到 特 
征 关系 中 。 

1 检查 特征 值 合 并 的 增强 SEMBPS01 

函数 EXIT. SAPLUPC, SERVICES. 001 : 


Q 输入 参数 
I AREA 计划 范围 
IS. CHAS 特征 值 
ITO_CHA 特征 

@ 例外 
INVALID =1 


2. 特征 衍生 增强 SEMBPS02 
函数 EXIT. SAPLUPC_ SERVICES. 002. 


D 输入 参数 
I AREA 计划 范围 
IS CHAS 输入 特征 值 
ITO_CHA 特征 
D 输出 参数 
ES_CHAS 输出 特征 值 
© 例外 
FAILED =1 


10.3 BW 系统 标准 表 


BW 系统 中 预定 义 了 大 量 的 透明 表 ， 这 些 表 用 来 存储 系统 标准 的 对 象 定义 ， 或 用 户 自 定 
义 对 象 的 相关 定义 和 控制 信息 等 数据 字典 信息 。 


10.3.1 ERP 中 与 BW 系统 相关 的 重要 表格 概览 


ЕВР 系统 是 BW 系统 最 为 重要 的 数据 来 源 ， 也 是 ЗАР 所 有 产品 中 数据 源 最 丰富 、 数 
据 量 最 大 、 数 据 处 理 逻 辑 最 复杂 的 源 系统 ， 因 此 了 解 ERP 系统 中 与 BW 系统 相关 的 表格 


就 显得 至 关 重 要 。ERP 中 与 BW 系统 相关 的 表格 主要 是 关于 数据 源 定义 和 数据 抽取 两 大 
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部 分 。 


与 数据 源 定 义 相关 的 透明 表格 见 表 10-3。 


表 10-3 数据 源 定 义 相关 的 透明 表 汇 总 


i 明 Ж 文本 说 明 
RODELTAM BW 增 量 进程 
RODELTAMT BW 增 量 处 理 (ЖЖ) 
ROOSOURCE BW OLTP 源 的 抬头 表 
ROOSOURCET OLTP 源 的 文本 
ROMDDELTA BW 分 配 数据 源 -更改 者 指针 (针对 主 数据 ) 
ROOSFIELD 数据 源 字 段 
ROOSGEN OLTP 源 的 已 生成 对 象 
ROOSGENQV 提取 结构 版 本 
ROOSGENQVF 提取 结构 版 本 的 字段 描述 
ROOSPRMS 每 个 数据 源 的 控制 参数 
RSFHGENTD 生成 事务 数据 的 数据 提取 程序 


与 数据 抽取 相关 的 透明 表格 见 表 10-4。 


表 10-4 数据 抽取 相关 的 透明 表 汇 总 


i H Ж 文本 说 明 
ROOSPRMSC 每 个 数据 源 渠道 的 控制 参数 
ROOSPRMSF 每 个 数据 源 的 控制 参数 


10.3.2 BW 系统 中 的 重要 表格 概览 
BW 系统 中 的 重要 表格 概览 见 表 10-5 ~ 表 10-31。 


210-5 BW 系统 统计 对 应 数据 表 


i 明 Ж 文本 说 明 
RSDDSTATAGGR 人 合 选择 和 记 账 的 统计 数据 BW 
RSDDSTATAGGRDEF 统计 数据 联机 分 析 处 理 (导航 步骤 /集合 定义 ) 
RSDDSTATBCACT BW 统计 一 一 激活 业务 内 容 
RSDDSTATCOND BW 统计 一 一 精简 运行 信息 块 的 数据 
RSDDSTATDELE BW 统计 一 一 信息 块 中 数据 删除 的 数据 
RSDDSTATEXTRACT 提取 器 BW 统计 (上 一 次 delta 加 载 的 时 间 ) 
RSDDSTATHANDLTP OLAP 统计 一 一 处 理 类 型 (运行 时 间 对 象 ) 
RSDDSTATSTEPTP 联机 分 析 处 理 统计 (导航 ) 步骤 类 型 
RSDDSTATWHM 统计 数据 于 仓库 管理 的 BW 


RSDDSTAT_DM 


Generated Table for View RSDDSTAT_DM 


RSDDSTAT OLAP 


Generated Table for View RSDDSTAT OLAP 


385 


310-6 BW -IP 对 应 数据 表 


5 H X 文本 说 明 
RSPLF_SRV 计划 服务 
RSPLF_SRVT 计划 服务 的 文本 表 


RSPLF_SRVTYPE 


RSPLF_SRVTYPET 


RSPLF_SRVTYPE_D 


RSPLF_SRVTYPE_P 


RSPLF_SRVTYPE_PT 


参数 定义 的 文本 表 


RSPLF SRVTYPE PV 


Generated Table for View КРГЕ SRVTYPE PV 


RSPLF. SRV. COND 


计划 服务 的 规则 条 件 


RSPLF_SRV_CU 特性 用 法 
RSPLF_SRV_P 参数 值 (基本 类 型 ) 


RSPLF_SRV_PS 


参数 值 ( 选择 类 型 ) 


RSPLF_SRV_TI 索引 (计划 服务 中 相关 的 TLOGO 对 象 ) 
RSPLS_SEQUENCE 计划 顺序 

RSPLS_SEQUENCET 计划 顺序 的 文本 

RSPLS_SEQUENCE_S 计划 步骤 


RSPLS_ALVL 


计划 一 一 集合 层 的 主键 表 


RSPLS_ALVLT 


RSPLS_ALVL_IOBJ 计划 一 一 信息 对 象 的 集合 等 级 
RSPLS_DS 数据 细 化 
RSPLS_DST 文本 表 (数据 段 ) 


RSPLS_DS_FIELD 


数据 段 (有 限制 的 信息 对 象 ) 


RSPLS_DS_HEAD 


数据 细 化 (抬头 表 ) 


RSPLS_DS_RANGE 


数据 段 (选择) 


表 10-7 BWA 对 应 数据 表 


i H Ж 文本 说 明 
RSDDSTATTREX 处 理 TREX 聚集 的 统计 数据 
RSDDSTATTREXSERV TREX 服务 器 的 详细 统计 

表 10-8 数据 源 对 应 数据 表 

透 明 表 文本 说 明 
RSDS SAP 业务 信息 仓库 中 的 数据 源 
RSDST 数据 源 一 一 文本 
RSOLTPSOURCE 在 BW 中 复制 联机 事务 处 理 源 表 
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表 10-9 转换 对 应 数据 表 


i 明 表 文本 说 明 
RSTRAN 转换 
RSTRANFIELD 规则 参数 的 映射 一 一 结构 字段 
RSTRANRULE 传输 规则 
RSTRANRULESTEP 转换 规则 的 规则 步 又 
RSTRANSTEPMAP 规则 内 规则 步骤 的 映射 
RSTRANSTEPROUT 规则 类 型 为 例 程 

表 10-10 DTP 对 应 数据 表 

i 明 Ж 文本 说 明 
RSBKBP BB 
RSBKDATAINFO 关于 数据 传输 进程 运行 时 间 缓 冲 的 信息 
RSBKDATAPAKID 数据 传输 进程 一 一 数据 包 的 状态 表 
RSBKDATAPAKSEL 数据 传输 进程 一 一 数据 包 选 择 
RSBKDTP SAP 业务 信息 仓库 (数据 传输 进程 标题 数据 ) 
RSBKDTPH 数据 传输 进程 (历史 版 本 ) 
RSBKDTPSTAT 关于 数据 传输 进程 的 状态 信息 
RSBKDTPT 关于 数据 传输 进程 的 文本 
RSBKDTPTH 关于 数据 传输 进程 的 文本 
RSBKREQUEST 数据 传输 进程 请 求 


RSBKREQUEST_V 


Generated Table for View RSBKREQUEST. V 


RSBKSELECT 数据 传输 协议 请 求 的 选择 (摘要 ) 
RSBKSUBSTEP 数据 传输 进程 中 子 步 又 的 属性 
RSDDSTATDTP 工作 场所 危险 物料 统计 明细 数据 传输 协议 表 


RSOACUBE_DTP 


OLTP 直接 访问 分 配 的 远程 DTP 目录 


表 10-11 层次 结构 对 应 数据 表 


i H X 文本 说 明 
RSHIEDIR 层次 结构 种 类 
RSHIEDIRT 层次 结构 目录 文本 
RSMHIERNODE 主 数 据 (不 能 标 出 的 层次 结构 节点 ) 


RSRHIEDIR_OLAP 


层次 结构 的 OLAP 有 关 信 息 


RSTHIERNODE 非 传递 层次 结构 节点 的 文本 
表 10-12 传输 规则 对 应 数据 表 
5 明 X 文本 说 明 
ррозт DD 一 一 字段 文本 (语言 依赖 ) 
RSAROUTT ABAP 例 程 一 一 文本 表 
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i 8] Ж 文本 说 明 
RSTS 传输 结构 
RSTSFIELD 传输 结构 字段 
RSTSRULES 传输 结构 和 传输 规则 

表 10-13 更 新 规则 对 应 数据 表 

i H Ж 文本 说 明 
RSUPDDAT 关键 指数 的 更 新 规则 
RSUPDINFO 更 新 信息 (状态 和 程序 ) 
RSUPDKEY 更 新 规则 一 一 每 一 关键 指数 的 关键 字 
RSUPDROUT 更 新 规则 一 一 ABAP (ER (检查 表 ) 

表 10-14 信息 包 对 应 数据 表 

i 明 Ж 文本 说 明 
RSLDPIO 志 数 据 包 一 一 编号 
RSLDPIOT 变 式 logdpid 的 文本 
RSLDPRULE 调度 器 选择 的 ABAP 代码 
RSLDPSEL 字段 调度 器 的 选择 表格 
RSMONICDP 监视 器 请 求 数据 包 表 格 
RSPAKPOS 处 理 信 息 包 组 中 的 性 别 定位 

#10-15 处理 链 对 应 数据 表 

i 明 表 文本 说 明 
RSEVENTCHAIN 事件 链 处 理事 件 表格 
RSEVENTHEAD 事件 链 标 题 
RSEVENTHEADT 事件 链 标 题 
RSPCCHAIN 进程 链 
RSPCCHAINATTR 进程 链 的 属性 
RSPCCHAINEVENTS 带 有 处 理 链 的 多 重 事件 
RSPCCHAINT 链 的 文本 
RSPCCOMMANDLOG 系统 命令 执行 日 志 (处 理 链 ) 
RSPCLOGCHAIN НЕ ID / $E Ш 交叉 表 
RSPCLOGS 进程 链 的 应 用 程序 日 志 (常规 服务 ) 
RSPCPROCESSLOG 链 运行 日 志 
RSPCRUNVARIABLES 运行 时 间 的 处 理 链 的 变量 
RSPCVARIANT 常规 变 式 一 一 存储 
RSPCVARIANTATTR 处 理 变 式 的 属性 
RSPCVARIANTT 常规 变 式 存储 的 文本 
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i 8] Ж 文本 说 明 
RSPC BUFFER 处 理 的 共享 缓冲 区 (特殊 的 客户 程序 ) 
RSPC_MONITOR 监控 器 单独 处 理 链 

表 10-16 查询 对 应 数据 表 

i 明 Ж 文本 说 明 
RSRREPDIR 所 有 报表 的 目录 
RSZCALC 公式 要 素 的 定义 
RSZCEL 查询 设计 者 一 一 单元 目录 
RSZCHANGES 更 改 报 告 组 件 的 历史 记录 
RSZCOMPDIR 报告 组 件 的 目录 
RSZCOMPIC 可 重用 组 件 和 信息 块 之 间 的 对 照 关系 
RSZELTATTR 每 个 维 数 要 素 的 属性 选择 
RSZELTDIR 报表 制作 组 件 要 素 的 目录 
RSZELTPRIO 带 要 素 冲突 的 优先 权 
RSZELTPROP 要 素 特性 (设置 ) 
RSZELTTXT 报表 制作 组 件 要 素 文本 
RSZELTXREF 查询 要 素 参 考 的 目录 
RSZGLOBV 报表 制作 中 的 全 局 变量 
RSZRANGE 要 素 的 选择 说 明 
RSZSELECT 要 素 的 选择 特性 

表 10-17 工作 敌对 应 数据 表 

透 明 表 文本 说 明 
RSRWBINDEX 二 进 制 大 型 对 象 的 清单 (Excel THEE) 
RSRWBINDEXT 信息 目录 中 的 二 进 制 对 象 (Excel Т/Б) 的 标题 
RSRWBSTORE 二 进 制 大 型 对 象 的 存储 ( Excel THI) 
RSRWBTEMPLATE 分 配 Excel 工作 短 作 为 个 人 模板 
RSRWORKBOOK 工作 竹中 报表 的 “所 用 处 清单 ” 

表 10-18 Web 模板 对 应 数据 表 

i 明 Ж 文本 说 明 
RSZWOBJ Web 对 象 的 存储 
RSZWOBJTXT 模板 /项 目 /视图 的 文本 
RSZWOBJXREF 模板 中 BW 对 象 的 结构 
RSZWTEMPLATE BW 中 HTML 模板 的 抬头 表 
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310-19 信息 对 象 对 应 数据 表 


i 明 Ж 文本 说 明 
RSDATRNAV 导航 属性 
RSDATRNAVT 导航 属性 
RSDBCHATR 主 数据 属性 
RSDCHA 特性 目录 
RSDCHABAS 基本 特性 (用 于 特性 、 时 间 特 性 和 单位 ) 
RSDDPA 数据 包 特性 
RSDIOBJ 所 有 信息 对 象 的 目录 
RSDIOBJCMP 言 息 对 象 的 混合 (MEH) 
RSDIOBJT 言 息 对 象 文本 
RSDTIM 时 间 特 性 
RSDUNI 单位 

表 10-20 信息 块 对 应 数据 表 

i 明 Ж 文本 说 明 
RSDCUBE 言 息 块 /信息 提供 者 的 目录 
RSDCUBEIOBJ 每 个 信息 块 的 对 象 (所 用 处 清单 ) 
RSDCUBEMULTI 和 多 块 有 关 的 信息 块 
RSDCUBET 信息 块 的 文本 
RSDDIME 维 数目 录 
RSDDIMEIOBJ 每 个 维 数 的 信息 对 象 (所 用 处 清单 ) 
RSDDIMET 维 数 文本 
RSDICHAPRO 指定 信息 块 特征 属性 
RSDICMULTIIOBJ 多 提供 商 (信息 对 象 的 选择 /标识 ) 
RSDICVALIOBJ 信息 块 NC 值 有 效 表 中 的 信息 对 象 
RSDIKYFPRO 指定 信息 块 中 的 关键 值 特 性 

%10-21 聚集 对 应 的 数据 表 

透 明 表 文本 说 明 
RSDDAGGRCOMP 集合 的 描述 
RSDDAGGRDIR 集合 的 目录 
RSDDAGGRT 集合 文本 

#10-22 DSO 对 应 数据 表 

透 明 表 文本 说 明 
RSDODSO 所 有 数据 存储 对 象 的 目录 
RSDODSOATRNAV 数据 存储 中 的 导航 属性 
RSDODSOIOBJ 操作 数据 存储 中 的 对 象 
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i 8] 表 文本 说 明 
RSDODSOT 数据 存储 的 文本 
RSDODSOTABL 所 有 数据 存储 表 的 目录 
表 10-23 PSA 对 应 数据 表 
透 明 表 文本 说 明 
RSTSODS 传输 结构 的 操作 数据 存储 
表 10-24 信息 源 对 应 数据 表 
透 明 表 文本 说 明 
RSIS 信息 源 (事物 数据 ) 
RSISFIELD 信息 源 字 段 (所 有 系统 的 供应 商 结构 ) 
RSIST 信息 源 文本 
310-25 通信 结构 对 应 数据 表 
i 明 Ж 文本 说 明 
RSISFIELD 信息 源 字段 (所 有 系统 的 供应 商 结构 ) 
RSKS 通信 结构 
RSKSFIELD 通信 结构 的 字段 
表 10-26 ”传输 规则 映射 对 应 数据 表 
i 明 表 文本 说 明 
RSISOSMAP 言 息 源 和 联机 事务 处 理 源 间 的 映射 
RSOSFIELDMAP 联机 事务 处 理 源 字段 和 信息 对 象 间 的 映射 
#10-27 InfoSpoke 对 应 数据 表 
i 明 Ж 文本 说 明 
RSBSPOKE InfoSpoke 的 目录 
RSBSPOKESELSET InfoSpokes 的 目录 
RSBSPOKET InfoSpoke 的 目录 
RSBSPOKEVSELSET InfoSpoke 的 目录 
RSBSTEPIDMESS jk Hub (请 求 的 日 志 ) 
表 10-28 Web Item 对 应 数据 表 
透 明 表 文本 说 明 
RSZWITEM BW Web 项 目的 标题 表 
RSZWITEMXREF 项 目的 交叉 参考 表 
RSZWMDITEM BW Web 元 数据 一 一 模块 项 目 (数据 供应 商 , 项 目 ，… ) 


i$ ІҢ x 文本 说 明 
RSZWMIMEIOBUFFER 通过 10 从 Mime 数据 库 路 径 转换 的 缓存 
RSZWOBJ Web 对 象 的 存储 
RSZWOBJTXT 模板 /项 目 / 视 图 的 文本 
RSZWOBJXREF 模板 中 BW 对 象 的 结构 
RSZWTEMPLATE BW 中 HTML 模板 的 抬头 表 

表 10-29 归档 对 应 数据 表 

i HJ Ж 文本 说 明 
RSARCHIPRO BW 归档 一 一 一 般 归档 属性 
RSARCHIPROIOBJ BW 归档 一 一 一 般 归 档 属性 
RSARCHIPROLOC BW 归档 一 一 一 般 本 地 属性 
RSARCHIPROLOCSEL BW 归档 一 一 被 归档 的 数据 范围 
RSARCHIPROPID BW 归档 一 一 信息 提供 者 的 程序 参考 
RSARCHREQ SAP 业务 信息 仓库 归档 一 一 归档 请 求 
RSARCHREQFILES BW 归档 一 一 确认 归档 文件 
RSARCHREQSEL BW 归档 一 一 请 求 的 选择 条 件 

Ж 10-30 Open Hub 对 应 数据 表 

透 明 表 文本 说 明 
RSBOHSERVICETP 放 Hub 一 一 服务 类 型 
RSBREQUESTDELTA 放 Hub 一 一 交叉 参考 出 站 /入 站 请 求 
RSBREQUESTMESS 放 Hub 一 一 请 求 的 日 志 
RSBREQUID 打开 Hub 一 一 请 求 
RSBREQUID3RD 打开 Hub 一 一 第 三 方 请 求 的 状态 
RSBREQUIDRUN 放 Hub 一 一 请 求 运行 具有 状态 的 表 
RSBSTRUCTURE 放 Hub 一 一 生成 的 结构 和 表 

表 10-31 其 他 对 象 对 应 的 数据 表 

i Ш x 文本 说 明 
DDO2L SAP 一 一 表 
DDO3L RTR 
DEVACCESS 发 用 户 表 
ROIDOCPRMS 源 系 统 数据 传输 的 控制 参数 
RSDDAGGRDIR 集合 的 目录 
RSERRORLOG 错误 记录 的 日 志 (标题 RSERRORHEAD) 
RSFEC BW 前 端 检查 
RSMONMESS Mae dH bL 
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(Ж) 


i 8] Ж 文本 说 明 
RSPSADEL 批量 删除 PSA 请 求 
RSSELDONE 监视 器 一 一 已 执行 请 求 的 选择 
SMEN_BUFFC 存储 收藏 夹 的 表 
TBTCO 作业 状态 概述 表 
TBTCP 批 作 业 步 又 概述 
TSTC SAP 事务 代码 
TSTCT 事务 代码 文本 
V. RSZGLOBV Generated Table for View V. RSZGLOBV 


10.4 BW 对 象 的 生成 表 


除 BW 系统 预定 义 的 透明 表 外 ， 在 SAP 系统 的 模型 创建 过 程 中 ， 系 统 会 根据 用 户 的 定 
义 ， 在 数据 库 层 面 生成 对 应 的 表 定 义 。 与 系统 表 存 储 数据 字典 信息 不 同 的 是 ， 生 成 表 主 要 用 
来 存储 自 定 义 对 象 或 系统 标准 业务 目录 对 象 (如 信息 块 和 DSO 等 ) 所 包含 的 业务 信息 。 

需要 说 明 的 是 ， 包 含 在 业务 目录 中 的 对 象 所 产生 的 数据 表 以 /BIO 开头 ， 而 用 户 自 定义 
的 对 象 产生 的 数据 表 以 /BICZ 开 头 ， 为 简单 、 直 观 起 见 ， 本 节 所 有 举例 都 以 /BIC/ 开 头 。 


10.4.1 信息 块 可 能 产生 的 表 


H Til Ben] 8 EE B xe l 10-32, 
表 10-32 信息 块 可 能 产生 的 表 


i Ш x 文本 说 明 
/BIC/F < CUBE > 包含 未 压缩 记录 的 事实 表 
/BIC/E < CUBE > 包含 压缩 记录 的 事实 表 
/BIC/D < CUBE > X 维度 表 
/ BIC/L « CUBE > 库存 模型 的 数据 表 
/BIC/V « CUBE >T 包含 所 有 对 象 和 导航 属性 的 结构 (以 对 象 代 码 /BIC/ 开 头 ) 
/BIC/V < CUBE > F 包含 了 了 表 和 上 上 表 内 容 的 数据 库 视 图 
/BIC/V < CUBE >I 包含 所 有 信息 对 象 的 结构 〈 以 对 象 代码 /BIC/Z 开 头 ) 
/BIC/V « CUBE » N 包含 所 有 导航 属性 的 结构 
/BIC/V < CUBE > J 包含 所 有 信息 对 象 的 结构 〈 以 对 象 名 开头 ) 
/BIC/V < CUBE > M 包含 所 有 对 象 和 导航 属性 的 结构 (以 对 象 名 开头 ) 
/BIC/V < CUBE >2 包含 所 有 对 象 和 导航 属性 的 结构 以 及 0INFOPROV ЖП 1ROWCOUNT 
/BIC/V <CUBE >H 包含 所 有 对 象 和 导航 属性 的 结构 以 及 层次 结构 标识 的 SID 


10.4.2 DSO 可 能 产生 的 表 


DSO 可 能 产生 的 表 见 表 10-33, 
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3510-33 DSO 可 能 产生 的 表 


文本 说 明 


/ BIC/A < DSO > 00 


DSO 激活 表 


/ BIC/A < DSO >40 


DSO 激活 队列 


/ BIC/A < DSO > 50 


DSO 活动 记录 ， 用 以 回 深 DSO 


/BIC/B жжжжжжжжжж 


DSO 的 变更 日 志 ， 同 数据 源 的 PSA 表 命 名 


10.4.3 ”信息 对 象 可 能 产生 的 表 


言 息 对 象 可 能 产生 的 表 见 表 10-34, 
表 10-34 信息 对 象 可 能 产生 的 表 
ë Hj Ж 文本 说 明 

/ BIC/P < CHAR > 时 间 无 关 的 属性 
/ BIC/Q < CHAR > 时 间 相 关 的 属性 
/BIC/S < CHAR > 主 数据 SID 表 
/BIC/X < CHAR > 时 间 无 关 导 航 属性 
/BIC/Y < CHAR > 时 间 相关 导航 属性 
/BIC/T <CHAR > 主 数据 文本 表 
/BIC/H <CHAR > 层次 结构 表 


/ BIC/I « CHAR > 


SID 层次 结构 


/ВІС/1 < CHAR > 


节点 的 范围 段 


/ BIC/K < CHAR > 


层次 节点 SID X 


/ BIC/OI « CHAR > 


信息 对 象 的 数据 元 素 


/ BIC/O < CHAR > 


信息 对 象 对 应 的 域 


10.4.4 定义 数据 流 可 能 产生 的 表 
定义 数据 流 可 能 产生 的 表 见 表 10-35。 


表 10-35 定义 数据 流 可 能 产生 的 表 
x H Ж 文本 说 明 
/ВІС/В sss sete 数据 源 PSA Ж 
/BIC/CC < ХХ > < DS > 传输 结构 
/BIC/CS «IS > 通信 结构 


10.5 BW 系统 中 有 用 的 程序 索引 


10. 5.1 BW 系统 中 常用 的 程序 列表 
BW 系统 中 常用 的 程序 列表 见 表 10-36, 


程序 名 称 


表 10-36 BW 系统 中 常用 的 程序 列表 


程序 功能 描述 


RSCDS_NULLELIM 


删除 所 有 关键 指标 为 0 的 事 


实 表 行 ， 参 见 See Note 619826 


了 94 


程序 名 称 程序 功能 描述 
RSDG_CUBE_ACTIVATE 激活 信息 块 
RSDG_CUBE_COPY 信息 块 复制 
RSDG_CUBE_DELETE 删除 信息 块 


RSDG_DODS_REPAIR 


激活 所 有 带 导航 属性 的 数据 存储 对 象 ODSO 


RSDG_ODSO_ACTIVATE 


激活 所 有 数据 存储 对 象 ODSO 


RSDG_IOBJ_ACTIVATE 激活 所 有 信息 对 象 
RSDG_IOBJ_DELETE 删除 信息 对 象 
RSDG_IOBJ_REORG 修复 信息 对 象 
RSDG_IOBJ_REORG_TEXTS 重组 信息 对 象 的 文本 


RSDG_MPRO_ACTIVATE 


激活 多 信息 提供 者 


RSDG MPRO COPY 


复制 2 信 息 提 供 者 


RSDG_MPRO_DELETE 


删除 多 信息 提供 者 


RS, COMSTRU, ACTIVATE ALL 


激活 所 有 未 激活 的 通信 结构 


RS, TRANSTRU, ACTIVATE, ALL 激活 传输 结构 

RSAU, UPDR, REACTIVATE ALL 激活 更 新 规则 

RRHI HIERARCHY ACTIVATE 激活 层次 结构 

SAP AGGREGATES ACTIVATE FILL | 激活 并 且 填 充 信息 块 的 聚集 
SAP_AGGREGATES_DEACTIVATE 取消 激活 信息 块 的 聚集 


RS_PERS_ACTIVATE 


激活 Bex 中 的 个 性 化 


RSSM_SET_REPAIR_FULL_FLAG 


将 全 量 上 载 请 求 转 为 修复 全 量 上 载 请 求 


SAP. INFOCUBE, DESIGNS 


打印 系统 中 的 信息 块 及 其 关联 对 象 


SAP_ANALYZE_ALL_INFOCUBES 


为 所 有 信息 块 创建 数据 库 统计 


SAP_CREATE_E_FACTTABLES 


创建 与 信息 块 或 聚集 对 应 的 压缩 表 - E Ж 


SAP_DROP_EMPTY_FPARTITIONS 


定位 /删除 信息 块 中 空 的 事实 表 划 分 


SAP_DROP_TMPTABLES 


I 除 临 时 的 数据 存储 对 象 ODSO 


SAP_RSADMIN_MAINTAIN 


兽 加 、 修 改 、 删 除 RSADMIN 表 的 条 目 


CUBE SAMPLE CREATE 


接 向 信息 块 中 写 人 随即 的 数据 


SAP_CONVERT_NORMAL_TRANS 


将 标准 信息 块 转换 为 实时 信息 块 或 相反 的 操作 


10. 5.2 BW 系统 中 常用 的 功能 函数 列表 
BW 系统 中 常用 的 功能 函数 列表 见 表 10-37, 


3510-37 BW 系统 中 常用 的 功能 函数 列表 
函数 名 称 ( 函数 功能 描述 之 函数 组 RRMX ) 函数 功能 描述 


RRMX_WORKBOOK_DELETE 


从 角色 和 收藏 夹 永久 删除 工作 短 


RRMX WORKBOOK LIST GET 


获得 所 有 工作 短 列 表 


RRMX_WORKBOOK_QUERIES_CET 


获得 一 个 工作 短 中 所 有 查询 的 列表 


RRMX QUERY WHERE USED GET 


获得 一 个 查询 所 用 处 清单 


RRMX JUMP. TARGET GET 


获得 跳 转 目标 的 列表 


RRMX JUMP. TARGET DELETE 


删除 跳 转 目标 
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函数 名 称 ( 函数 功能 描述 之 函数 组 RRMX ) 函数 功能 描述 
MONI. TIME CONVERT 时 间 转 换 函 数 

CONVERT. TO. LOCAL CURRENCY 将 外 币 转换 到 本 位 币 

CONVERT. TO. FOREIGN. CURRENCY 将 本 位 币 转换 到 外 币 

TERM, TRANSLATE TO UPPER, CASE 将 文本 转换 到 大 写 


UNIT_CONVERSION_SIMPLE 


单位 的 转换 (参考 表 T006) 


TZ_GLOBAL_TO_LOCAL 


将 时 间 截 转换 到 本 地 时 间 


FISCPER_FROM_CALMONTH_CALC 


将 0CALMONTH 3X OCALDAY 转换 到 会 计 年 度 或 期 间 


RSAX BIW GET DATA SIMPLE 


通过 功能 函数 调用 的 一 般 数 据 抽取 


RSAU_READ_MASTER_DATA 


在 数据 转换 中 用 于 读 取信 息 对 象 的 属性 


RSDRI_INFOPROV_READ 
RSDRI_INFOPROV_READ_DEMO 
RSDRI_INFOPROV_READ_RFC 


通过 RFC 的 方式 读 取信 息 块 或 ODSO 的 内 容 


DATE_COMPUTE_DAY 


返回 第 几 周 的 第 几 个 工 
DATE. ТО DAY 返回 第 几 周 的 第 几 个 工作 日 
DATE GET. WEEK 返回 当前 是 第 几 个 工作 周 
RP_CALC_DATE_IN_INTERVAL 从 一 个 具体 日 期 增加 或 减少 年 /月 /日 


RP_LAST_DAY_OF_THE_MONTHS 
SLS_MISC_GET_LAST_DAY_OF_MONTH 


取得 某 一 月 份 的 最 后 一 天 


RSARCH_DATE_CONVERT 


用 以 处 理 日 期 转换 ， 适 用 于 信息 包 的 例 程 


RSPC_PROCESS_FINISH 


触发 处 理 链 的 事件 


DATE CONVERT TO. FACTORYDATE 


返回 某 一 天 的 工作 日 历 


CONVERSION, EXIT PDATE OUTPUT 


将 日 期 从 YYYYMMDD 转换 为 DD/MM/YYYY 的 格式 


CONVERSION_EXIT_ALPHA_INPUT 


外 部 到 内 部 的 ALPHA 转换 


y 


CONVERSION_EXIT_ALPHA_OUTPUT 


内 部 到 外 部 的 ALPHA 转换 


y 


RSPC_PROCESS_FINISH 


完成 处 理 链 中 的 一 个 处 理 


RSAOS_METADATA_UPLOAD 从 ERP 系统 中 上 载 元 数据 
RSDMD_DEL_MASTER_DATA WIR ЕЛІ 


КӨРС. CHAIN, ACTIVATE REMOTE 


传输 完毕 后 对 处 理 链 的 激活 


10.5.3 BW 系统 中 处 理 转 换 错误 的 类 列表 


在 BW 系统 中 处 理 转换 错误 的 类 列表 见 表 10-38, 
表 10-38 BW 系统 中 人 处理 转换 错误 的 类 列表 


程序 类 CL_RSTRAN_STAT 


功能 描述 


DELETE VERSION. FROM, DB 


在 转换 元 数据 丢失 的 情况 下 ， 从 数据 库 层 面 删除 转换 的 版 本 


DELETE RULE FROM DB 


删除 指定 转换 和 


的 一 个 规则 


CL RPE CONVERT 


CL АВАР CHAR, UTILITIES 
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处 理 特殊 字符 


10.5.4 BW 系统 中 常用 的 程序 列表 


BW 系统 中 常用 的 程序 列表 见 表 10-39, 
表 10-39 BW 系统 中 常用 的 程序 列表 


增强 和 BADI 功能 描述 
RS_BBS_BADI 报表 跳 转 的 增强 BADI 
SMOD. RSR00004 报表 跳 转 的 增强 BADI 
RSDBC_SQL_STATEMENT 数据 库 连 接 的 SQL 语句 的 BADI 
RSR_OLAP_AUTH_GEN 创建 用 户 权 限 的 BADI 
RSR OLAP BADI 处 理 虚 拟 关 键 指标 的 BADI 
RSU5_SAPI_BADI 针对 46C 的 增强 BADI 
OPENHUB_TRANSFORM Open Hub 的 增强 BADI 
RSRA_ALERT 报表 的 批量 预警 
RSAR_CONNECTOR 公式 编辑 器 的 BADI 
BW_SCHEDULER 顺序 处 理 增强 BADI 
RSOD_DOC_BADI 文档 处 理 的 BADI 
RSOD ITEM, DOC Web 项 目的 单个 文档 BADI 
RSOD ITEM, DOC, LIST Web 项 目的 文档 列表 BADI 
RSOD_WWW_DOC_MAINT 在 网 页 上 维护 文档 的 BADI 
RSAP0001 ERP 中 数据 源 的 出 口 增强 
RSR00001 报表 变量 的 增强 出 口 
RSR00002 虚拟 关键 指标 的 处 理 
RSR00004 报表 跳 转 的 增强 


397 


附 孙 ”术语 对 照 


ABAP Advanced Business Application Programming SAP 系统 中 的 二 次 开发 语言 


АТУ SAP List Viewer 


ANSI American National Standards Institite 
APD Analysis Process Designer 
B 


BADI Business Add - Ins 
BAPI Business Application Program Interface 


BCS Business Consolidation 

BCT Business Content 

Bex Business Explorer 

BI Business Intelligence 

BO Business Object 

BOBJ Business Object 

BPS Business Planning & Simulaiton 

BTE Business Transaction Event 

BW SAP Business Information Warehouse 


BW - BPS BW Business Planning & Simulation 
BW -IP BW Integrated Planning 


С 

CR Crystal Report 

CRM Customer Relationship Management 
Cube InfoCube 

D 

DB DataBase 


DBMS Database Management System 
DBTG Database Task Group 


DI Data Integrator 

DM Data Mining 

DQ SAP Data Quality 

DSO Data Storage Object 
DSS Decision Support System 
DTP Data Transfer Process 
DW Data Warehouse 
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SAP 列表 数据 灵活 显示 工具 
美 家 标准 协会 
分 析 流 程 设 计 器 


业务 对 象 接口 

业务 应 用 程序 接口 

SAP 业务 合并 

SAP BW 中 的 业务 目录 

业务 浏览 器 (SAP BW 自 带 的 商 
务 智能 工具 ) 

商务 智能 

SAP 旗下 专注 于 商务 智能 的 
SAP 公司 的 商务 智能 展现 平 
BW 计划 和 模拟 

SAP 系统 中 的 业务 交易 事件 
SAP 公司 商务 智能 数据 仓库 平台 
BW 计划 和 模拟 

BW 集成 计划 


д] 


Ір > 


水 晶 报 表 
客户 关系 管理 
数据 仓库 中 的 多 维 立方 体 对 象 


数据 库 

数据 库 管理 系统 

网 状 数据 库 的 代表 

BOBJ 的 数据 抽取 工具 

数据 挖掘 

BOBJ 的 数据 清洗 工具 

数据 仓库 中 的 二 维 数据 存储 对 象 
决策 支持 系统 

SAP BW 中 的 数据 传输 进程 

数据 仓库 


Data Warehouse Workbench 


SAP Enterprise Central Component 
Enterprise Data Warehouse 
Enterprise Information Management 
SAP Enterprie Portal 

Enterprise Performance Management 
Enterprise Resource Planning 


Extraction Transformation Loading 


Function Module 


File Transfer Protocol 


Gartner Group 


Governance/ Risk Management/ Compliance 


High - Performance Analytic Appliance 


Human Capital Management 


International Business Machines Corporation 


Intermediate Document 
Information Management System 
Java Data Base Connectivity 
Key Performance Indicator 

Line Of Business 

Multi Dimensionale Xpressions 
Network as a Service 

SAP NetWeaver 


Near Line Storage 


On - Line Analysis Processing 


数据 仓库 工作 台 


企业 核心 组 件 
企业 级 数据 仓库 

企业 信息 管理 

SAP Netweaver 中 的 门户 产品 
企业 绩效 管理 

企业 资源 计划 

数据 抽取 、 转 换 、 加 载 


功能 模块 
文件 传输 协议 
高 德 纳 咨 询 公 司 

监管 /风险 管理 / 合 规 性 管理 


高 性 能 分 析 设备 (SAP 公司 推出 
的 内 存 数据 库 ) 
人 力 资 源 管 理 


国际 商业 机 器 公司 〈 开 行业 的 蓝 
GEA) 

SAP 用 于 传输 业务 数据 的 一 种 数 
据 格式 

言 息 管理 系统 


Java 数据 库 连接 


关键 绩效 指标 

业务 条 线 

多 维 表达 式 

网 络 即 服务 

SAP 公司 的 业务 集成 化 应 用 平台 
近 线 存储 


联机 分 析 处 理 
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OLTP 
ORACLE 


On - Line Transaction Processing 


Oracle 


Predict Analysis 

Platform as a Service 

SAP Process Integration 
Product Lifycycle Management 


Persistent Storage Area 


Remote Function Call 


Real Time Data Process 


Sostware as a Service 
Systems Applications and Products in 


Data Processing 


Service Application Program Interface 
Supply China Management 

SAP Community Network 

Strategy Enterprise Management 
Surrogate ID 

Simple Object Access Protocol 
Standard Query Language 

Supplier Relationship Management 
SAP Business Suite 


Transaction Code 


Transformation 


Universal Data Integrate 


Uniform Resoure Locator 


Visual Basic for Applications 


Work Breakdown Structure 


Web Intelligence 


联机 交易 处 理 
甲骨 文公 司 (世界 第 二 大 独立 软 
件 供应 商 ) 


预测 性 分 析 

平台 即 服 务 

SAP NetWeaver 中 的 流程 集成 产品 
产品 生命 周期 管理 

持久 数据 存放 区 域 


远程 功能 调用 
实时 数据 处 理 


软件 即 服务 

思 爱 普 公 司 (世界 上 最 大 的 管 
理 软件 提供 商 ， 旗 下 有 著名 的 
软件 ， 如 SAP ERP 和 CRM 等 ) 
数据 服务 应 用 程序 接口 
供应 链 管理 

SAP 社区 网 络 

企业 战略 管理 

代理 ID 号 

简单 对 象 访问 协议 

标准 查询 语言 
供应 商 关 系 管理 

SAP 推出 的 包含 多 种 产品 在 内 的 
软件 包 


SAP 系统 中 的 交易 事物 码 
SAP BW 中 的 转换 


通用 数据 集成 
统一 资源 定位 器 


Visual Basic 的 一 种 宏 语言 


工作 分 解 结构 
SAP BOBJ 中 的 一 种 报表 展现 工具 
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进 阶 阅读 


(SAP BW/BOSLXIBFH — 15 x 71 
Office— f z]BW/BO) 
15ВМ.978-7-111-37555-5 


(SAP ABAP 开 发 从 入 门 到 精通 》 
ISBN 978-7-111-41700-2 


(SAP 战略 绩效 管理 完全 解决 方案 》 
ISBN 978-7-111-30582-8 


《工程 师 突击 一 -SAP ABAP 袜 用 程序 开发 攻略 》 
ISBN 978-7-111-29891-5 


—— 


ISBN 978-7-111-50218-0 


° 对 SAP 解 决 方 案 感 兴趣 的 IT 工 作者 ; 

e FH RI Zn ABWZ 6 T fr (8. же xt АВАР E n iR Л $T 
解 的 顾问 ; 

e E,22 S-h&it iR £ERPIAB,. АЯ ЖЕ T АВАР Е, fB A 
对 BW 中 的 ABAP 实 施 了 解 不 多 的 技术 顾问 ; 

* 相关 专业 师 生 。 


亦 书 主要 介 络 SAP 商 务 智 能 和 骸 据 仓库 建设 管理 ,其 内 容 不 限于 
对 SAP BW# 49 7253418, A860 3 9X UR) 
经 验 ， 站 在 企业 信息 管理 的 角度 对 整个 建设 过 程 进 行 罗 考 
00 654SHTAAITSX, ROUGE, d VIE. BUDA 
工作 者 以 及 与 之 相关 的 业务 工作 人 员 ， 同 时 也 适合 相关 人 员 在 实际 
项 目 过 程 中 作为 工具 市 使 用 ， 指 导 商务 慷 能 和 数据 仓库 系统 架构 ， 
加 强 系 统管 控 ， 从 一 开始 就 为 系统 进行 顶层 设计 ， 吉 免 重 复 建 设 和 
ARTIR, LI ANA LEE: 


上 架 指 导 : ERP/SAP 


ISBN 978-7-111-50218-0 


| 电话 服务 
| 服务 咨询 热线 : 010-88361066 
SANTI TET | 读者 购书 热线 : 010-68326294 
9 16 TO Ediki 3t j 010-88379203 
服务 
Ж. 起 传播 "n nrw. www.cmpbook.com 
为 中 
工 官 博 : weibo.com/cmp1952 
ж. Md cca EE www.golden-book.com 
务 网 : 
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